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ANTECEDENTES 
HISTORICOS 


HISTORIA DEL ADA 


ARA comenzar diremos que el lenguaje fue denominado 
Ada en honor de la primera programadora de la historia, 
lady Ada Augusta Byron (1816 - 1852), condesa de Lovela- 
ce, hija del poeta lord George Byron. Lady Ada colaboró 
con Charles Babbage en sus trabajos acerca de la «máqui- 
na diferencial», predecesora de los modernos ordenado- 
res. 

El Departamento de Defensa de los Estados Unidos 
(Department of Defense, DoD) gasta anualmente miles de 
millones de dólares en aplicaciones software, incluyendo diseño, desarro- 
llo, adquisición, gestión, soporte operacional y mantenimiento. Parte de es- 
tos gastos se emplean en software para los llamados «bembedded compu- 
ters» o calculadores empotrados, subsistemas que forman parte de siste- 
mas más complejos, como sistemas de comunicaciones para control de trá- 
fico aéreo, sistemas militares, etc. 

A comienzos de la década de los años setenta, el DoD inicia un proyec- 
to de estudio de los lenguajes de programación existentes con la idea de 
estandarizarlos. 

En 1975 comienza un programa con el objetivo de estandarizar un len- 
guaje para aplicaciones en tiempo real. La idea era proveer un único len- 
guaje de programación común para ordenadores militares. Para ello se creó 
una comisión que dirigiese los esfuerzos de búsqueda de este lenguaje. 
A esta comisión se la llamó High Order Language Working Group (HOLWG) 
(Grupo de Trabajo para Lenguaje de Alto Nivel). 

Los razonamientos esgrimidos para la búsqueda de dicho lenguaje co- 
mún fueron los siguientes: 


— La utilización de lenguajes de alto nivel lleva consigo una reducción 
en los costes de programación, 

— Con lenguajes de alto nivel la legibilidad de los programas aumen- 
ta, facilitando, por tanto, su modificación y mantenimiento. 


> 


— Un lenguaje de alto nivel puede ser utilizado en las fases de especi- 
ficación, proporcionando una gran ayuda en las fases de verificación y 


pruebas. 


— Si se reduce el número de lenguajes utilizados se consigue un gran 
beneficio económico. 


1975 


1976 


1977 


1978 


1979 


1980 


1981 


Creación del HOLWC. 


Orden 5000.31 


Evaluación de lenguajes. 
Petición de ofertas. 
4 contratos (rojo, verde, amarillo, azul). 


Evaluación de los cuatro lenguajes. 
2 contratos (rojo y verde). 


Evaluación de los dos lenguajes. 
Preliminary Ada. 

Evaluación Ada. 

1 contrato. 


MIL-STD 1815. 


Modificación de 5000.31 


Fig. 1. Historia del lenguaje Ada. 


El HOLWG estableció una serie de requerimientos para el nuevo len- 
guaje común, publicando una serie de documentos que contenían sucesi- 
vos refinamientos de sus requisitos. Los documentos elaborados fueron: 
Strawman (1975), Woodenman (1975), Tinman (1976), Ironman (1977), 
Revised Ironman (1977), Sandman (1978), Steelman (1978), Pebbleman 
(1978) y Stoneman (1979). 
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Reducir Reutilización Fiabilidad Eficiencia Portabilidad 
los costes del software del software del código del software 
del software máquina 


Fig. 2. Objetivos del lenguaje. 


Los objetivos que debían ser cubiertos por el nuevo lenguaje eran: 
— Reducir los costes del software. 
— Facilitar la reutilización de partes del software en proyectos diferen- 


tes. 

— Aumentar la fiabilidad del software. 

— Aumentar la legibilidad de los programas. 

— Eficiencia del código máquina. 

— Definición completa del lenguaje para evitar la existencia de dialec- 
tos. 


— Ser un lenguaje «portátil», pudiendo ser utilizado en una gran va- 
riedad de máquinas. 


A comienzos de 1977, el HOLWG comienza la evaluación de una serie 
de lenguajes existentes con el propósito de determinar si alguno o una 
combinación de dichos lenguajes satisfacía los requerimientos del docu- 
mento Tinman. Alrededor de 26 lenguajes fueron evaluados por distintas 
organizaciones llegando a la conclusión de que ninguno de los lenguajes 
podía ser adoptado como lenguaje común y, si bien el desarrollo de éste 
era posible con la tecnología disponible en el año 1977, el diseño del nue- 
vo lenguaje debía realizarse a partir de uno de los lenguajes existentes, ex- 
cluyendo a Fortran, Cobol, Tacpol, CMS-2, Jovial J3B y J73, Simula 67, Al- 
gol 60 y Coral 66. Se recomendaba, como base partida, Pascal, PL/1 o Al- 
gol 68. 

En mayo de 1977, el DoD lanza una petición de oferta para producir 
un prototipo según los requerimientos Ironman, recibiéndose ofertas de 
firmas nacionales y extranjeras. Obtienen contratos cuatro de ellas para 
realizar sus lenguajes prototipos. 

Las cuatro firmas eran Intermetrics, Cii-Honeywell Bull, SRI Interna- 
tional y SofTech. A sus proyectos se les asignan los colores clave Red, 
Green, Yellow y Blue. Las compañías mencionadas propusieron el lengua- 
je Pascal como lenguaje de partida. 


Z 


A comienzos de 1978 los cuatro diseños fueron revisados por 400 per- 
sonas de todo el mundo. En esta revisión participaron representantes de 
la industria, militares, agencias gubernamentales y representantes de la 
vida académica. Fruto de esta revisión el abanico de candidatos quedó re- 
ducido a dos: los lenguajes Green y Red. Ambos consiguieron un contrato 
para un año más de desarrollo, según los requerimientos Steelman. En 
marzo de 1979, los diseños Green y Red son enviados para su evaluación 
a distintos centros de desarrollo de software para su evaluación. Una vez 
valorados los informes se proclama ganador al lenguaje Green. Ada se con- 
vierte en el nombre oficial del lenguaje en mayo de 1979. 

Los factores que decidieron la victoria del lenguaje Green sobre el Red 
fueron sus construcciones más avanzadas, su diseño más estable y la com- 
pilación separada de unidades de programa. 

A continuación se inicia un período de refinamiento del lenguaje, que 
acaba a mediados del año 1980 con la publicación de un nuevo manual 
del lenguaje Revised Ada. 

Ada constituye actualmente la norma militar MIL - STD 1815, firmada 
el 10 de diciembre de 1980. 


Reduce los costes de desarrollo. 


Permite la portabilidad del software. 


Incrementa la productividad. 


Favorece la mantenibilidad. 


Incrementa la fiabilidad. 


Fig. 3. Aportaciones de Ada. 


El HOLWG dejó paso al Comité de Control para el lenguaje Ada (Ada 
Language Control Board, ALCD) y al Ada Joint Project Office (AJPO). El 
primero tiene la responsabilidad de velar por la conformidad con el están- 
dar de las futuras realizaciones. En cuanto al segundo, su principal misión 
es el soporte, distribución y desarrollo de herramientas y librerías, coor- 
dinando las actividades del DoD para optimizar la utilización de los dife- 
rentes recursos comunes. 
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Existe, además, otro comité, el Ada Technical Working Group (ATWG), 
presidido por el DoD responsable de definir y mantener el Ada estándar, 
y compuesto por representantes del gobierno, industria, servicios públicos 
e intereses extranjeros. 


VALIDACION DEL COMPILADOR ADA 


En 1979, el DoD lanza una petición de oferta para proveerse de un Ada 
Compiler Validation Capability, conjunto de pruebas, procedimientos y do- 
cumentación elaborados para asegurar el desarrollo de compiladores que 
cumplan el estándar del lenguaje. 

La empresa SoftTech de Waltham, Mass, recibe el encargo de elabora- 
ción de la ACVC. El desarrollo de la ACVC comenzó antes de finalizar la 
definición del estándar Ada. 

La ACVC conta de: 

— Implementer's Guide (IG). 

— Programas de pruebas. 

— Herramientas de soporte de validación. 

Los programas de prueba comprenderán unos 1.000 programas, a una 
media de 50 líneas por programa, clasificados en las siguientes categorías: 
* Clase A: Pruebas que pasan si no se detectan errores al compilar. 

* Clase B: Son programas ilegales. Pasan si todos los errores que con- 
tienen son detectados. 

* Clase L: Programas ilegales que contienen errores que no pueden ser 
detectados antes del montaje. 

* Clase C: Programas ejecutables que se autocomprueban. 

* Clase D: Pruebas de capacidad. 

* Clase E: Pruebas de ambigiiedad del estándar. 


ENTORNO DE SOPORTE A LA PROGRAMACION 
DE ADA (APSE) 


El propósito de un APSE (Ada Programming Support Environment, 
APSE), es el soporte del desarrollo y mantenimiento del software de apli- 
caciones Ada a lo largo de su ciclo de vida, con particular énfasis en el soft- 
ware para aplicaciones de «embedded computers». Las características prin- 
cipales de un APSE son: 


La base de datos 


Contiene toda la información asociada con cada proyecto. 


Compilador 


Funciones 
KAPSE 


Intérprete 
del lenguaje 


Debugger 


Gestor de 
Configura- 
ciones 


Montador 
y cargador 


Nivel 1 


Nivel 3 


Fig. 4. Estructura de APSE. 


Interfases del sistema y usuario 


Incluye el lenguaje de control que constituye la interfase con el usua- 


rio y las interfases sistema entre la base de datos y el conjunto de herra- 
mientas. 


El conjunto de herramientas 


Compuesto por los útiles para desarrollo de programas, mantenimien- 
to y control de configuración. 


Stoneman indica los siguientes niveles de un APSE: 
* Nivel 0: 


Hardware soporte y software apropiado. 
* Nivel l: 


KAPSE, contiene las funciones de la base de datos, comunicación y so- 
porte de ejecución que permiten la ejecución de un programa Ada. 
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* Nivel 2: 

MAPSE. Provee un conjunto mínimo de útiles escritos en Ada y sopor- 
tados por el KAPSE. 

* Nivel 3: 

APSE. Construido por extensiones del MAPSE para dar soporte com- 
pleto a aplicaciones o metodologías particulares. 


REALIZACIONES EN EE.UU. 


Intel. Corp. 

Telesoftware Inc. 

Datageneral Corp. 

New York University. 

Carnegie-Mellon University e Intermetrics. 


University of California at Berkeley. 


Fig. 5. Realizaciones Ada en EE.UU. 


Empresas que de una forma u otra tienen relación con el lenguaje de 
programación Ada son: 

* Data General Corp., dedicada al desarrollo de compiladores. 

* New York University, dedicada al desarrollo de compiladores Ada con 
fines educacionales. 

* Carnegie Mellon University e Intermetrics, dedicadas a desarrollar 
compiladores Ada, bajo contrato de la DARPA (Agencia de Investigaciones 
Avanzadas para la Defensa). 

* Telesoftware Inc., filial de la Western Digital Corp. que produce el 
Pascal. - 

* Intel Corp., adopta el lenguaje Ada para el microprocesador que te- 
nía en desarrollo, el APX432. El compilador de Intel sería un compilador 
cruzado (cross compiler), funcionando en VAX y se preveía su aparición 
en 1981. 
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CARACTERISTICAS DEL ADA 2 


OMO se vio en el capítulo anterior los objetivos para con- 
seguir el lenguaje Ada se han orientado a desarrollar un 
lenguaje común, así como un conjunto de herramientas 
que faciliten su utilización en sistemas militares, funda- 
mentalmente, con misiones críticas. Pero el lenguaje Ada 
no queda reducido al ámbito de los sistemas de armas, ya 
que posee una amplia variedad de usos para aplicaciones 
informáticas en tiempo real. Ejemplos de sistemas para los 
==x=xx== cuales el entorno Ada resulta de gran interés son la auto- 
matización industrial, control de procesos, etc. 


AREAS DE APLICACION DEL ADA 


La siguiente lista intenta dar al lector una amplia visión de los campos 
de utilización del lenguaje Ada. 


* Aplicaciones en tiempo real, cálculo numérico, procesamiento de se- 
ñal y control de hardware: 


— Sistemas de comunicaciones. 

— Sistemas de navegación. 

— Sistemas de control para robótica. 

Sistemas de control para procesos químicos. 
Sistemas de control para plantas nucleares. 
— Sistemas de control para tráfico aéreo. 

— Sistemas de radar, sonar y Óptica. 


* Sistemas para la gestión de datos: 


— Sistemas para la gestión de base de datos. 
— Sistemas para la gestión de información. 
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Aplicaciones en tiempo real. 


Gestión de datos. 


Simulación. 


Descripción de diseños. 


Descripción de Hardware. 


Fig. 1. Aplicaciones del Ada. 


* Sistemas para la simulación (simuladores): 


— Sistemas para juegos de guerra. 
— Simuladores de vuelo. 

— Entrenadores. 

— Prototipos. 

— Sistemas gráficos. 


* Descripción de diseños: 
— Lenguajes para el diseño de sistemas. 


* Descripción de hardware para circuitos de alta escala de integración 
(VLS)): 

— Lenguajes para descripción de hardware. 

— Lenguajes para la modelización del hardware y la simulación. 


Como podemos apreciar por la extensa lista de aplicaciones del Ada 
éste es, con diferencia, el lenguaje que mayor número de sistemas pueden 
utilizarlo hoy día. 


CARACTERISTICAS DEL ADA 


El Ada, como todo lenguaje, tiene sus partidarios y detractores. Estos 
últimos achacan al lenguaje una gran complejidad, apto tan sólo para pro- 
gramadores experimentados. 
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Subprogramas 
Unidades Paquetes 


de programa Tareas 
Genéricos 


Fig. 2. Características de programas Ada. 


Ada posee una gran variedad de características. Todos los programas 
en Ada se componen de una o más unidades de programa que pueden ser 
compiladas independientemente. Un programa Ada puede utilizar carac- 
terísticas del lenguaje que permiten la construcción de un programa, a par- 
tir de una colección de unidades de programa en librería. Estas unidades 
de programa pueden estar constituidas por módulos definidos por el usua- 
rio, unidades predefinidas en el lenguaje y unidades definidas en el entor- 
no. Estas unidades de programa pueden incluir una combinación de las si- 
guientes entidades: 


* Subprogramas (funciones o procedimientos). 


* Paquetes (<<Packages>>). 
* Tareas (<<Task>>). 
* Genéricos (<<Generics>>). 


Además, cada una de estas unidades de programa están constituidas por 
dos partes: 


— Especificación (<<specification>>) 


Esta parte de la unidad de programa contiene la información que ne- 
cesitan otras unidades de programa. 


— Cuerpo (<<body>>) 


Esta parte de la unidad de programa contiene los detalles de la reali- 
zación de la unidad. 


Las características básicas de las unidades de programa son las siguien- 
tes: 


* Los subprogramas pueden venir expresados de dos maneras: proce- 
dimientos y funciones. 

* Los subprogramas pueden tener parámetros que permitan que la in- 
formación pueda ser pasada a y desde el subprograma al punto de llamada. 

* Los procedimientos, en general, serán utilizados para indicar una se- 
rie de acciones. 

* Las funciones, en general, serán usadas para el tratamiento y la de- 
volución de una variable. 

* Los paquetes (<<packages>>) pueden ser utilizados para definir 


ES 


un grupo común de datos o tipos de datos, un conjunto de unidades de pro- 
grama relacionados, o un tipo abstracto de datos (tad). 

* Los paquetes permitirán al programador especificar qué parte de la 
unidad será visible al usuario del <<package>> y qué otra parte será 
oculta. 


Especificación 


Parte 
ejecutable 


Parte 
declarativa 


Fig. 3. Composición de una unidad de programa. 


* Las tareas ( < <tasks> > ) pueden ejecutarse en paralelo. 

* Las especificaciones y los cuerpos (<<bodies>>) pueden compi- 
larse por separado. 

* El cuerpo de las unidades de programa se compone de dos partes: 
una parte declarativa, la cual define las entidades que serán utilizadas en 
la unidad de programa, y una parte ejecutable, la cual define la secuencia 
de ejecución de las instrucciones de la unidad de programa. 

* El cuerpo de una unidad de programa puede tener asociado un con- 
junto de tratamientos de excepción ([ < <exception handlers> > ) que 
pueden ser utilizados para la recuperación de condiciones de error u otros 
requisitos de tratamientos de error que requiera la aplicación. 


También debemos saber que la parte declarativa de una unidad de pro- 
grama asocia un nombre con la entidad declarada que la unidad de pro- 
grama utilizará. Estas entidades pueden incluir un tipo de datos, una cons- 
tante, una variable, un subprograma anidado, una unidad de <<packa- 
ge>> anidada, una unidad de tarea anidada o una unidad genérica. 
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La parte ejecutable de una unidad de programa está compuesta de una 
combinación de los siguientes tipos de instrucciones: 


— Assignment. 
Instrucción de asignación. Una variable pasa a tener el valor computa-- 


do de una expresión. 


— Procedure call. 


Instrucción de llamada a un procedimiento. Con ésta invocaremos la 
ejecución de un subprograma. 


— Case. 


Instrucción de selección. Los amantes del Pascal reconocerán en esta 
instrucción una estructura de control de selección que permite listar dis- 
tintas alternativas y elegir que se ejecute una en tiempo de ejecución. La 
selección se hace comparando el valor de una expresión con un rótulo 
asignado a cada acción. 


— If. 

Instrucción condicional. Permite la selección de un conjunto de ins- 
trucciones dependiendo de una condición. 

— Loop. 

Instrucción de iteración. Es una sentencia de control que permite la 


ejecución de un bloque de instrucciones de forma iterativa mientras se dé 
una condición. 


— Exit. 


Instrucción de salida. Permitirá abandonar un bucle (<<loop>>) de 
manera condicional o incondicional. 


— Block. 


Permite la introducción de entidades locales que aplican a la secuen- 
cia de instrucciones contenidas en el bloque. 


— Raise. 


Genera una condición de error definida por el programador. 

Ada posee una amplia variedad de tipos de datos. Cada objeto en el len- 
guaje Ada, constante o variable, tiene un tipo de datos que especifica el con- 
junto de valores permitidos para dicho objeto, así como el conjunto de ope- 
raciones que pueden desarrollarse sobre ellos. Los tipos de datos soporta- 
dos por Ada son: 


— Tipos enteros. 
— Tipos en coma fija. 
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— Tipos en coma flotante. 

— Tipos enumerados. 

— Tipos array. 

— Tipos registro. 

— Tipos acceso (punteros). 

— Tipos privados (<<privates>>). 


En relación con los tipos de datos, Ada permite al programador espe- 
cificar diferentes características de los tipos de datos, en tiempo de ejecu- 
ción, tales como direcciones, número de bits, etc., a través de la utiliza- 
ción de cláusulas de representación ( < <representation clauses> > ). 

En capítulos posteriores se realizará una exposición más detallada de 
las características del lenguaje. 


ESTUDIO COMPARATIVO DE ADA 
CON OTROS LENGUAJES 


En ocasiones puede resultar interesante resaltar las peculiaridades de 
un lenguaje, comparado con otros, con el fin de tener una idea más com- 
pleta de dicho lenguaje. 

Se han elegido en esta ocasión tres lenguajes populares tales como el 
Pascal, Fortran y C. La tabla que presentamos a continuación está basada 
en los trabajos de J. V. Cugini, de la National Bureau of Standards, el cual 
analizó varios lenguajes con el objeto de proporcionar una guía en la se- 
lección y utilización de tales lenguajes. 


LL 


Características 

del lenguaje ADA Cc FORTRAN — PASCAL 
Estilo sintáctico 

Formato libre Sí Sí No Sí 
Formas de etiqueta Nombre Nombre Número Número 
Tamaño máx. identificador (ts) 8 6 DL (**) 
Variables no declaradas No No Sí No 
Control de ejecución 

Programación estructurada Sí Sí Parcial Sí 
Bloques Sí Sí No Sí 
Recursividad Si Sí No Sí 
Procedim. genéricos Sí No No No 
Tratamiento excepciones Sí No No No 
Tratamiento de errores Sí No No No 
Concurrencia Sí No No No 


(**) NOTA: Ll = Longitud de línea. 
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Características 


del lenguaje ADA Cc FORTRAN PASCAL 
Control de datos 
Variables automáticas Sí Sí Sí Sí 
Variables estáticas No Sí Sí No 
Variables asignadas por el 

usuario Sí Sí No Sí 
Datos externos Sí Sí Sí No 
Tipos definidos por el usuario Sí Sí No Sí 
Comprobación de tipos Sí No No Sí 
Operadores definidos por el 

usuario Sí No No No 
Grado de flexibilidad Alto Medio Bajo Medio 
Datos numéricos 
Enteros Sí Sí Sí Sí 
Coma fija Sí No No No 
Coma flotante Sí Sí Sí Sí 
Complejos No No Sí No 
Operadores básicos Sí Sí Sí Sí 
Funciones numéricas Pocas Ninguna Varias Algunas 
Librerías numéricas Pocas Algunas Varias Algunas 
Arrays 
Dimensiones Hlimitado Ilimitado 7 Ilimitado 
Tipo de subíndice Discreto Entero Entero Discreto 
Límite inferior definido por 

el usuario Sí No Sí Sí 
Asignación de array Sí No No Sí 
Inicialización de array Sí No Sí No 
Comparación de array Sí No No No 
Registros 
Registros/Estructuras Sí Sí No Sí 
Asignación de registro Sí No No Sí 
Comparación de registro Sí No No No 
Formato variab./dinámico Sí No No Sí 
Otros tipos de datos 
Carácter Sí Sí Sí Sí 
Cadena Sí Sí Sí Si 
Lógico/boolean Sí Sí Sí Sí 
Enumerado Sí No No Sí 
Puntero Sí Sí. No Sí 
Conjuntos No No No Sí 
Control interno de representación Sí No No No 
Entrada/salida y archivos 
Archivos secuenciales Sí Si Sí 
Archivos de acceso directo Sí Sí Sí No 
Otros factores 
Bajo nivel de E/S Sí No No No 
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FORTRAN — PASCAL 


METODOLOGIAS DE DISEÑO 
ORIENTADAS AL ADA 


N este capítulo describiremos, de forma breve, varias me- 
todologías asociadas con el diseño y realización de una 
aplicación en Ada. También nos referiremos al grado de 
soporte que proporciona cada una de las metodologías de 
diseño orientadas a este lenguaje. 

También daremos al final de este capítulo una breve 
descripción de áreas de aplicación de este potente lengua- 
je, así como las futuras orientaciones de éste. 


— 
_—— 
AS 
—_— 
—_———— 
—— 
AS 
__TIgI/A/A/<> 
——_— 


PRINCIPIOS DE DISEÑO E IMPLEMENTACION 


En general, los principios asociados con la ingeniería del software, el 
diseño y la implementación podemos resumirlos en: 


Estructuración 


Conjuntos y subconjuntos relacionados forman un todo. Los objetivos 
de la estructuración en el diseño y la implementación son: 


— Reducir la complejidad 
— Incrementar la inteligibilidad. 


Modularidad 


Una forma racional de conseguir la estructuración. Los objetivos de la 
modularidad son: 


— Hacer explícitas las interfases entre partes de la estructura. 
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Fig. 1. Características de la modularidad. 


— Dividir el diseño en módulos que serán desarrollados independien- 
temente. 


Abstracción 


Eliminación controlada de detalles, resaltando los esenciales y elimi- 
nando los no esenciales. La abstracción ayuda a entender los aspectos de 
interés, ya que controlamos el nivel de detalle que necesitamos ver. 


CONDUCE 
MODULARIDAD 


Fig. 2. Características de la abstracción. 


Los objetivos de la abstracción, relativos al diseño y la implementación, 
pueden considerarse similares a los de la modularidad, ya que en algunas 
metodologías la abstracción se utiliza como el principal criterio para ob- 
tener la modularidad. 


Ocultamiento 


Hace que ciertos detalles o criterios de diseño sean inaccesibles. El 
ocultamiento, como la abstracción, podría verse como un medio para con- 
seguir la modularidad. 
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El ocultamiento nos proporciona un método para definir qué partes se- 
rían visibles y qué ocultaríamos dentro del módulo. Los detalles que ocul- 
taríamos se basarían en: 


— Probabilidad de cambio para un detalle. Si tal probabilidad existe, 
ocultar un detalle dentro de un módulo minimizará el efecto del cambio. 

— Complejidad del detalle. 

En resumen, los principios en los que se basan la ingeniería del soft- 
ware, tales como estructuración, modularidad y abstracción están orienta- 
dos a reducir la complejidad y, por tanto, aumentarán nuestro conocimien- 
to acerca del diseño y la implementación. Por otra parte, los principios de 
modularidad y ocultamiento están orientados a limitar el impacto de los 
cambios sobre el diseño o la implementación. 


Fig. 3. Principios en los que descansa la 1. del software. 


METODOLOGIAS DE DISEÑO 


Como aproximación al diseño de una aplicación describiremos una se- 
rie de metodologías que, si bien pueden no satisfacer las más rígidas defi- 
niciones y aspectos de lo que significa una metodología, pueden cubrir las 
necesidades del diseñador de aplicaciones. 


Fig. 4. Metodologías de diseño. 
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Diseño orientado al objeto 


El diseño orientado al objeto es una metodología de diseño descrita por 
G. Booch y desarrollada por varias personas. Esta metodología, como un 
proceso de diseño, se concentra sobre la estructura de una aplicación tal 
y como uno la vería si únicamente observó los objetos abstractos que com- 
ponen la aplicación y las operaciones sobre esos objetos. Concentrarnos 
sobre dichos objetos se aparta del punto de vista más tradicional que apun- 
ta a que toda estructura de una aplicación derivaría de una descomposi- 
ción «top-down» (de arriba abajo) de las funciones que deben ser desarro- 
lladas por esa aplicación. El diseño orientado al objeto puede aplicarse de 
una manera «top-down». En este caso, esta metodología seguiría el cami- 
no natural, en el cual los objetos y los datos de la aplicación se descom- 
ponen en lugar del camino en el cual se dividen las funciones. 


Esta metodología puede utilizarse con aplicaciones de menos de 30.000 
líneas de código, si bien puede ser empleada para proyectos de mayor en- 
vergadura, siempre que se utilice en conjunción con otra u otras metodo- 
logías que permitan dividir la aplicación en pequeños trozos, a los cuales 
se les pueda aplicar, de forma independiente, la metodología que estamos 
analizando. 


La metodología del diseño orientado al diseño puede ser vista como una 
metodología de diseño intermedia entre el diseño preliminar y el diseño 
detallado. La principal ventaja de esta metodología, de cara al diseñador 
de aplicaciones en fase de iniciación, es que es «intuitiva» y puede ser uti- 
lizada de forma sencilla para un eficaz aprovechamiento de las caracterís- 
ticas del Ada. 


La metodología del diseño orientado al objeto se construye basándose 
en un proceso de tres etapas, las cuales identificamos a continuación: 


Definición del problema 


* Establecer el problema que deseamos solucionar en una sola senten- 
cia. 


* Organizar y clarificar cualquier información que se nos dé acerca del 
problema. 
Desarrollo de una «estrategia» informal para el dominio del problema 


* Establecer en un único párrafo «una solución» al problema mencio- 
nado en líneas anteriores. 
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Formalización de la estrategia 


* Desarrollar la estrategia informal para un diseño estructural en Ada: 


Identificando los objetos de la aplicación y sus atributos. 
Identificando las operaciones sobre esos objetos. 
Estableciendo las interfases para los objetos y operaciones. 
Implementando las operaciones en Ada. 


>? UNE 


Las representaciones utilizadas por esta metodología de diseño incluye 
notaciones gráficas para expresar la estructura y las interacciones entre 
elementos del diseño y una completa sintaxis del lenguaje de diseño de pro- 
gramas Ada. Esta notación gráfica fue desarrollada para resaltar las inter- 
fases de los elementos que compondrán el diseño. 


Metodología JSD 


La metodología JSD (Jackson System Development) fue desarrollada 
por M. Jackson sobre métodos de análisis de requisitos, diseño y progra- 
mación durante la década de los setenta. JSD no es una metodología «top- 
down» como eran ciertas metodologías de esa época. JSD está basada en 
la observación de que la estructura de un programa refleja la estructura 
de los datos, es decir, el diseño es un proceso de exposición de la estruc- 
tura de los datos inherentes en el problema y transformación de esa es- 
tructura de datos dentro de una estructura de programa o sistema. 

La metodología Jackson es utilizada en Europa y se emplea para des- 
arrollo de sistemas de gestión, y a veces ha sido utilizada para algunos sis- 
temas en tiempo real. 


Diseño de sistemas con Ada 


Esta metodología proporciona una aproximación «top-down» al aspec- 
to arquitectónico del diseño de una aplicación Ada. Esto se consigue con 
el uso de una notación gráfica del diseño, la cual representa, de forma muy 
aproximada, las características del lenguaje Ada. 

La metodología ha sido caracterizada como «diseño estructurado orien- 
tado al objeto», en la cual los objetos son los componentes que desarro- 
llan la estructura de la aplicación o el sistema. Estos componentes son vis- 
tos por el diseñador como «cajas negras», la organización interna de los 
componentes y sus detalles son ocultos. Esta visión de las cosas es total- 
mente coherente con las «unidades de programa» vistas en Ada. Esto hace 
de Ada un lenguaje natural para implementar un diseño utilizando esta me- 
todología. 

Como Ada soporta el anidamiento de estructuras de programa, podría- 
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mos esperar que cualquier metodología de diseño permitiría desarrollar 
el diseño de una manera «top-down» usando un refinamiento progresivo. 
El diseño de sistemas con la metodología Ada soporta esto de una forma 
directa, y permite al diseñador crear un conjunto de «subsistemas» que 
pueden representar a la aplicación como una estructura única. A partir de 
aquí pueden crearse subsistemas adicionales que representen al nivel su- 
perior de diseño. Este proceso puede repetirse para cada uno de los nue- 
vos niveles hasta que el diseñador ha especificado completamente el di- 
seño. 

El diseño de sistemas con metodología Ada no propone un proceso de di- 
seño formal de una manera particular, pero proporciona al diseñador un 
esquema de representación y una guía en la aplicación del Ada a los pro- 
blemas del mundo real. 

Los procesos de diseños, a los cuales esta metodología parece adaptar- 
se, son: 


— Diseño orientado al objeto. 
— Diseño estructurado. 


Lenguaje de diseño de programas 


El lenguaje de diseño de programas (Program Design Language, PDL), 
también llamado «seudocódigo» por algunos autores, proporciona un me- 
dio para la representación de datos y procesos a través de un lenguaje tex- 
tual. Este lenguaje debe ser lo suficientemente preciso de manera que nos 
permita describir el software y expresar un diseño a través de él. Un PDL 
tiene una sintaxis formal que nos indica las construcciones de procesos y 
datos, a la vez que incorpora descripciones del lenguaje natural en un for- 
mato libre para explicar ciertos detalles. Si bien un PDL no es directamen- 
te ejecutable, técnicas automatizadas para evaluación de diseños han sido 
desarrolladas por Hitachi, IBM y otros. Las instrucciones de un PDL pue- 
den ser agrupadas en tres categorías: 


— Declaración de datos. 
— Descripción del proceso. 
— I/O (entrada / salida). 


Construcciones especiales pueden ser incorporadas, al tiempo que para 
cierto tipo de aplicaciones particulares pueden desarrollarse nuevas ins- 
trucciones, tales como instrucciones para aplicaciones multitarea o en 
tiempo real. 

Con Ada tenemos un lenguaje de programación de propósito general 
que es lo suficientemente expresivo como para describir todos los aspec- 
tos del diseño software. Un lenguaje de diseño de programas, que soporte 


26 


todos los tipos de aplicación que deseamos conseguir a través de Ada, debe 
reunir las siguientes características: 


— Abstracción. 

— Descomposición. 

— Ocultamiento de la información. 
— Refinamiento sucesivo. 

— Modularidad. 


La mayoría de estas características formaron parte de los requisitos es- 
tablecidos para la creación de Ada, lo cual hace de Ada un lenguaje muy 
conveniente para un PDL. Para dar un soporte a estos principios, un PDL 
debe documentar el diseño resultante y debe poseer las siguientes cualida- 
des: 


— Debe ser legible e inteligible por las personas que llevan a cabo el 
proceso de diseño. 

— Debe dar una representación completa, concisa, precisa y estructu- 
rada del diseño. 

— Debe ser verificable y troceable, con relación a los requisitos de di- 
seño establecidos para el sistema. 

Como ejemplo de una descripción de lenguaje de diseño para un tro- 
zo de clasificación (SORT) podría ser la siguiente: 


IF 


El primer elemento > segundo elemento de la lista. 

THEN 

Intercambia ambos elementos. 

ELSE 

Reemplaza el primer elemento con el buffer de entrada 1 reemplaza el 
segundo elemento con el buffer de entrada 2. 

ENDIF 


PRINCIPIOS SOPORTADOS POR LAS 
METODOLOGIAS DE DISENO ORIENTADAS A ADA 


La siguiente tabla resume el grado de soporte que las metodologías des- 
critas en el apartado anterior proporcionan a la ingeniería del software. 


Metodología Características Grado de apoyo 
Diseño orientado al Estructuración Alta 
objeto Abstracción Alta 
Modularidad Alta 
Ocultamiento Moderado 
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Metodología Características Grado de apoyo 


Metodología Jackson Estructuración Alta 
Abstracción Moderada 
Modularidad Moderada 

Ocultamiento Bajo 

Diseño de sistemas en Estructuración Alta 

Ada Abstracción Alta 

Modularidad Alta 

Ocultamiento Alto 

Lenguaje de diseño Estructuración Alta 
de programas Abstracción Moderada 
Modularidad Moderada 


OTRAS AREAS DE UTILIZACION DEL ADA 
PARA EL FUTURO 


Debido a su gran potencia el espectro de utilización de este lenguaje se 
extiende desde la descripción hardware a la definición de base de datos. 
Este rango de utilización de Ada puede tomar las siguientes formas: 


— Complementar el lenguaje Ada con características especializadas 
utilizando el concepto de «paquete» (package) de Ada. Esta forma ha sido 
utilizada para ampliar el campo de Ada dentro de nuevos dominios de apli- 
cación. 

— Añadir características a Ada con extensiones a su sintaxis y semán- 
tica. Esta forma da origen a un nuevo lenguaje, el cual es, a menudo, pre- 
procesado. 

— Utilizar conceptos y características selectivas de Ada para un nuevo 
lenguaje. 

Ada es un lenguaje adecuado para aplicaciones de simulación, ya que 
soporta «procesos concurrentes». Esto permite a Ada ser utilizado como 
lenguaje de simulación proporcionando una capacidad similar a lenguajes 
como SIMSCRIPT 11.5. 

Las características necesarias que sirvan de base para la utilización de 
Ada como lenguaje de simulación pueden proporcionarse a través de un 
conjunto de «paquetes» que posean capacidades especiales. 

Características propias del Ada, tales como «paquetes», «tareas» (tas- 
king) y «genéricos» (generics), así como también conceptos derivados de 
la ingeniería del software, hacen que el desarrollo de «simulaciones» sea, 
como mínimo, tan sencillo como utilizar lenguajes de simulación especia- 
lizados. 
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Otra importante aplicación del Ada reside en contemplar a este lengua- 
je como lenguaje orientado a base de datos. Grandes sistemas, en uso hoy 
día, requieren no solamente la utilización de un lenguaje de programación 
de propósito general, sino también necesitan un completo sistema de ges- 
tión de base de datos. 

Para apoyar esta clase de aplicación, varios grupos se han encargado 
de la investigación de un lenguaje de aplicación a Ada al que la Computer 
Corporation of America ha denominado ADAPLEX. Este lenguaje aporta a 
Ada, a nivel de declaración e instrucción, la definición de datos y capaci- 
dad de manipulación propias de un lenguaje interactivo. Para llegar a Ada- 
plex se añadió a Ada un sublenguaje de base de datos, el cual permitiría al 
codificador de aplicaciones libertad para entremezclar las capacidades de 
los dos lenguajes de una forma fuertemente integrada, creando un entor- 
no general de lenguaje fácil de usar y mantener. Adaplex ha añadido dos 
categorías de características a Ada, las cuales se denominan «declaracio- 
nes de esquema» e «instrucciones de transacción» Esto puede verse como 
una extensión al propio lenguaje Ada, que da lugar a un nuevo lenguaje. 

Una base de datos en Adaplex tiene características de «interface» simi- 
lares a un «paquete» de Ada, pero se le ha incorporado como una unidad 
estructural separada. Dentro de los distintos tipos de «unidades de progra- 
ma» existentes en Ada, podemos utilizar libremente distintos tipos de ins- 
trucciones y expresiones que usan atributos asociados con entidades de la 
base de datos. 

Finalmente, diremos que con la llegada de los circuitos integrados a 
gran escala (Very Large Integrated Circuit, VLSI), Ada puede ser conside- 
rado como un lenguaje de descripción de hardware. El DoD (Department 
of Defense) se ha intereseado en la aplicación de los circuitos integrados 
a gran escala para sus sistemas, debido a que este tipo de circuitos aumen- 
ta la fiabilidad y reduce los costes. En 1980 el DoD lanzó un programa de- 
nominado «Very High Speed Integrated Circuits» (VHSIC) donde se reco- 
gen las necesidades del DoD en este área, así como las herramientas nece- 
sarias para soportar el desarrollo y uso de dispositivos en tiempo real. 
Como parte de este programa se intentó definir un lenguaje de descrip- 
ción de hardware orientado a VHSIC y conocido por las siglas VHDL. Los 
requisitos para el VHDL establecían que el lenguaje debía soportar el di- 
seño, la documentación y una simulación eficaz del hardware desde el ni- 
vel de diseño del sistema hasta el nivel de «puerta»; el lenguaje debía ser 
extensible a un número adecuado de tecnologías de hardware, metodolo- 
gías de diseño y entornos de soporte; el lenguaje debía usar construccio- 
nes de Ada si esto era posible. 
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VISIÓN GENERAL DE ADA 
COMO LENGUAJE = 


N este capítulo resaltaremos las principales ideas que sir- 
ven de base al lenguaje de programación Ada y las com- 
pararemos con aquellas otras que sustentan al lenguaje de 
programación Pascal, con el propósito de establecer los 
puntos comunes que existen entre ambos. También dare- 
mos una breve descripción de aquellas características de 
Ada que apoyan los principios de la ingeniería del software. 


CONSTRUCCIONES 


Declaraciones Instrucciones 
de tipo de control 


Fig. 1. Construcciones de un lenguaje. 


Las construcciones tradicionales de un lenguaje pueden ser clasifica- 
das dentro de las siguientes categorías: 


— Declaraciones de tipo. 
— Declaraciones de datos. 
— Expresiones. 
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— Instrucciones de control. 
— Subprogramas y parámetros. 
— Reglas de alcance. 


Daremos una breve descripción de cada una de estas categorías y com- 
pararemos, en ciertos momentos, las características que proporcionan am- 
bos lenguajes, Ada y Pascal. 


DECLARACIONES DE TIPO 


Fig. 2. Declaraciones de tipo. 


Tanto Pascal como Ada proporcionan cuatro clases de tipos definidos 
por el usuario: 


— Tipos enumerados. 

— Tipos Array. 

— Tipos registro. 

— Tipos puntero (llamados tipos acceso en Ada). 


Veamos algunos ejemplos. 


type dirección = (Norte, Sur, Este, Oeste); (PASCAL) 
type direccion is (Norte, Sur, Este, Oeste); (ADA) 
type celda = array [1..10] of integer; (PASCAL) 

type celda is array (1..10) of INTEGER); (ADA) 


La palabra reservada type se utiliza una sola vez en Pascal para definir 
los tipos; sin embargo, en Ada es usada para cada declaración de tipo. 

Entre los tipos definidos por el usuario, dados anteriormente, no men- 
cionamos el tipo subrango, porque este concepto no corresponde a un tipo 
en Ada. Una declaración de un subtipo escalar no introduce un nuevo tipo, 
pero define un conjunto de valores contiguos al tipo base. 


type diasemanal = Lunes... Jueves; (PASCAL) 
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subtype diasemanal is dia range Lunes... Jueves; (ADA) 


Ada proporciona otras dos clases de subtipos: subtipos array y subtipos 
registro. Inicialmente pueden declararse subtipos array sin fijar los límites 
del índice, pero posteriormente debe establecerse el límite a través de una 
declaración subtipo. 

En Ada las funciones predefinidas asociadas con tipos se denominan 
ATRIBUTOS del tipo. El atributo POS corresponde a la función de Pascal 
ord, y los atributos PRED y SUCC corresponden en Pascal a las funciones 
pred y succ. 

Ada posee un importantísimo tipo que no posee Pascal. Este tipo se lla- 
ma tipo tarea (task type) y está relacionado con la <<multitarea>>. 


DECLARACIONES DE DATOS 


Constantes 


Escaleras 


Punteros 


Fig. 3. Declaraciones de datos. 


El lenguaje Ada, así como el Pascal, poseen las siguientes clases de de- 
claraciones: 


— Declaraciones de constantes. 
— Declaraciones de escalares. 
— Declaraciones de arrays. 

— Declaraciones de registros. 
— Declaraciones de punteros. 


Las declaraciones de datos en Ada son dinámicas, lo que no ocurre en 
Pascal, que son estáticas, es decir, en Ada las declaraciones pueden ser ex- 
presadas en términos de variables de programa, mientras que en Pascal 
las declaraciones se expresan en términos de constantes que son conoci- 
das en tiempo de compilación. 

En Ada un dato puede ser inicializado en la declaración. 

Veamos algunos ejemplos. 


const pi = 3.141592; (PASCAL) 

pi: constant FLOAT:= 3.141592; (ADA) 
var a,b: diasemanal; (PASCAL) 

a,b: diasemanal:=martes; (ADA) 


En Pascal la utilización de las palabras clave const y var se hace una 
sola vez para declarar las constantes y variables. En Ada no se utiliza una 
palabra clave como introducción a la declaración de datos. La declaración 
de una constante dinámica en Ada puede realizarse de la siguiente forma: 


arriba: constant INTEGER: M + 1 


Como vemos en el ejemplo anterior, los valores dependen del valor de 
la variable M cuando esta declaración es procesada. 
Un ejemplo de array dinámico podría ser el siguiente: 


dinámico: array (1..N) of FLOAT: = (1 = 2.0, others = 0.0); 


En el ejemplo anterior el tamaño del array depende del valor de N cuan- 
do esta declaración es procesada. 


EXPRESIONES Y OPERADORES 


En Ada existen, como en Pascal, operadores aritméticos, relacionales 
y booleanos. Veamos una primera diferencia de conexión de estos opera- 
dores en Ada y Pascal. 


if (K<0) and (¡>10) then... (PASCAL) 
ifk<0 and j>10 then... (ADA) 


Como se observa, en Pascal son necesarios los paréntesis porque el ope- 
rador and tiene nivel de prioridad más alto que los operadores relaciona- 
les. En Ada los operadores booleanos tienen el nivel de precedencia más 
bajo. 

Tanto en Ada como en Pascal, los operadores relacionales se definen 
para objetos escalares y para cadenas, es decir, arrays de caracteres. 


0) 
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SENTENCIAS DE CONTROL 


Instrucciones 
Asignación 


Instrucciones 
Procedimiento 


Instrucciones 
Condicionales 


Instrucciones 
Iteracción 


Instrucciones 
Flujo control 


Fig. 4. Sentencias de control. 


Las sentencias de control que ambos lenguajes aportan son: 


— Instrucciones de asignación. 

— Instrucciones de procedimiento. 
— Instrucciones condicionales. 

— Instrucciones de iteración. 

— instrucciones de flujo de control. 


Ada permite asignaciones a partes de un array (llamadas <<sli- 
ces>>). Veamos un ejemplo de esto último. 
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type mes is array (1..31) of INTEGER; (ADA) 
meses: mes 
meses (1..4):=(7,7,9,5) 


Programa 1. Ejemplo de sentencia «case». 


Las instrucciones de iteración en Pascal son while, repeat y for. Ada tie- 
ne una única instrucción de bucle que puede ser utilizada por sí misma, 
O puede ser prefijada con cláusulas for o while. Veamos un ejemplo. 


Programa 2. Ejemplo de iteración. 


Ada no posee la instrucción repeat del Pascal. En el último ejemplo ob- 
servamos que no hay condición para que el bucle finalice, por lo que se 
produciría un error al alcanzar el array sus límites. Este bucle infinito pue- 
de ser abortado insertando una instrucción condicional, la cual realiza un 
chequeo para la finalización en unión con una instrucción exit, return O 
goto. 


d:=0; loop d:=d+1; F(d):=d; exit when d= 50;end loop; 


Este último ejemplo tiene todas las características de una instrucción 
repeat. Ada proporciona una salida incondicional a través de la instruc- 


== SUBPROGRAMAS 


En Ada, como en Pascal, los subprogramas pueden estar constituidos 
por procedimientos y funciones. La estructura general es similar, una ca- 
becera de función o procedimiento, unas declaraciones y una secuencia 
de instrucciones. Las llamadas a los subprogramas son similares también. 
Tan sólo existen entre ambos lenguajes pequeñas diferencias sintácticas. 


Programa 3. Ejemplo de subprogramas. 


En Pascal los valores que una función devuelve se asignan a la variable 


Programa 4. Ejemplo de funciones. 


En Ada no se permiten «efectos laterales» sobre los parámetros, pero 
sí sobre los datos globales. Esto significa que las funciones en Ada pueden 
tener solamente parámetros in. 

Ada permite utilizar nombres idénticos para procedimientos y funcio- 
nes, al contrario de lo que sucede en Pascal, que ambos nombres deben 
ser únicos. 


a la complejidad de estos grandes sistemas. 

Las investigaciones de la ingeniería del software demostraron, en la pa- 
sada década, que la construcción de programas únicos y monolíticos da- 
ban lugar a un producto de difícil utilización y mantenimiento. 

Se llegó a la conclusión de que un sistema debía ser dividido en un nú- 
mero de componentes que pudiesen ser tratados de manera independiente. 

Para entender las características que deberían incluirse en un lenguaje 
de programación para que éste sirviese de soporte a la ingeniería del soft- 
ware, sería de utilidad repasar los conceptos que surgieron en la pasada 
década. Estos conceptos son: 


— Modularidad. 
— Abstracción. 
— Concurrencia. 
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— Tratamiento de excepciones. 
— Interfase con el hardware. 


Expliquemos un poco estos conceptos, ya mencionados en otros capí- 
tulos, introduciendo los conceptos de Ada que los soportan. 


MODULARIDAD 


Como ya hemos comentado, la modularidad consiste en dividir un gran 
sistema en partes o módulos, de manera que podamos hacer un tratamien- 
to de cada una de estas partes de forma independiente. Ada soporta esta 
necesidad a través de: unidades de programa y por compilación separada. 
Junto a las tradicionales construcciones de modularización, tales como 
subprogramas (procedimientos y funciones), Ada proporciona dos cons- 
trucciones como son las tareas y los paquetes. 

Un paquete (package) está formado por dos partes diferenciadas: la es- 
pecificación (visible) y el cuerpo (implementación). La parte visible es ac- 
cesible al usuario del paquete y puede contener declaraciones de tipos, da- 
tos, subprogramas, tareas y paquetes. Sin embargo, la implementación es 
oculta al usuario. Por ejemplo, no hay un camino a través del cual acce- 
der a los datos locales del cuerpo (implementación) de un paquete. Vea- 
mos un ejemplo: 


Programa 5. Ejemplo de «paquete». 


En Ada no es necesario que la implementación vaya inmediatamente 
después de su parte visible. Podemos primero escribir un conjunto de par- 
tes visibles para, posteriormente, añadir los cuerpos de implementación 
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al final del programa. De esta forma un programador puede inicialmente 
concentrarse sobre la especificación de los componentes del sistema y 
preocuparse de los detalles de implementación posteriormente. 

La posibilidad de poder separar la especificación del cuerpo es una ca- 
racterística de Ada que permite compilar la parte visible de un paquete, in- 
dependientemente de su cuerpo de implementación. 

Las compilaciones separadas junto con la separación de la parte visi- 
ble de la implementación proporcionan el medio de especificar las inter- 
fases («interfaces») de los diferentes módulos de un sistema. Esto es im- 
portante en el desarrollo de grandes sistemas con gran número de progra- 
madores, porque permite a éstos desarrollar y probar módulos del sistema 


== ABSTRACCIÓN 


La abstracción es una herramienta que permite enfocar nuestra aten- 
ción sobre aspectos diferentes de los objetos en diferentes tiempos. Una 
forma de abstracción se encuentra en los lenguajes de programación. Esta 
forma se soporta a través de procedimientos, funciones o subrutinas. 

Ada proporciona dos formas de abstracción que raramente se encuen- 
tra en otros lenguajes de programación: abstracción de datos y abstracción 
de tipos. Distinguiremos una forma «débil» y otra «fuerte» de abstracción 
de datos: encapsulación de datos y abstracción estructural. Veamos un 


Programa 6. Ejemplo de abstracción. 


La forma más potente de abstracción de datos, abstracción estructural, 
normalmente incluye encapsulación de datos, pero a la vez oculta la es- 
tructura del tipo encapsulado. Por ejemplo: 


h 
O 


Programa 7. Ejemplo de abstracción estructural. 


La diferencia entre estos dos ejemplos reside en que en el primero uno 
puede operar directamente sobre cualquier elemento de una pila, mien- 
tras que en el segundo se tiene acceso a la pila solamente a través de las 
Operaciones que proporcionan PUSH y POP. 

La abstracción de datos se utiliza a menudo como regla para dividir un 
sistema en unidades coherentes. 

La abstracción de tipos es un requisito crucial para escribir software 
reutilizable. En lenguajes que no poseen abstracción de tipos el programa- 
dor debe reescribir la especificación completa y la implementación de un 
paquete cuando se cambia algún pequeño detalle, tal como el tipo de ele- 
mento de la pila en el ejemplo anterior. Por ejemplo, podríamos crear un 
esquema de programa para pilas que es independiente del tipo de elemen- 
to de la pila. 


Programa 8. Ejemplo de programa independiente del tipo de elemento. 


En este momento podríamos declarar una variedad de módulos de pila, 
así: 


package PilaReal is new ModuloPila (FLOAT); 
Package PilaEntera is new ModuloPila (INTEGER); 


Las unidades genéricas son especialmente útiles si uno desea definir 
una estructura y Operaciones sobre dicha estructura, independientemente 
del tipo particular de elementos que puedan ser almacenados en la estruc- 
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tura. Esta forma de abstracción de tipos es de gran utilidad para el propó- 
sito de escribir software reutilizable. 


Jl 


CONCURRENCIA 


Hay problemas que sólo pueden ser resueltos utilizando procesos con- 
currentes, tales como sistemas operativos, reserva de plazas en compañías 
aéreas, sistemas expertos, etc. 

Los sistemas que requieren procesos concurrentes son muy difíciles de 
escribir correctamente en lenguajes que no soportan concurrencia. Los 
problemas se presentan en áreas tales como acceso a datos y recursos com- 
partidos. 

Ada es uno de los pocos lenguajes de programación que proporciona 
el soporte adecuado para los procesos concurrentes. La construcción que 
soporta la concurrencia es la tarea (task). 

En su estructura, la tarea es similar al paquete (package); está formada 
por una parte visible y un cuerpo (implementación). De manera similar al 
paquete, en la tarea la especificación está completamente separada de la 
implementación. Esta separación hace de la tarea una construcción muy 
útil para la modularización. Con respecto a la compilación separada, las 
tareas solamente pueden ser subunidades, no unidades de librería. 

Sin embargo, hay dos diferencias básicas entre tareas y paquetes: en 
contraste con el cuerpo del paquete, el cuerpo de una tarea define una ac- 
tividad independiente y la interfase de'la tarea define un número de pun- 
tos de entrada dentro de la tarea. Supongamos la tarea que gestiona una 
reserva en una compañía aérea. 


Programa 9. Ejemplo de «tarea». 


Otras tareas comunican con la tarea ListaVuelo llamando a esos pun- 
tos de entrada de una manera similar a las llamadas a procedimientos. 


ListaVuelo.RESERVA(x); 
ListaVuelo.CANCELA(y); 


42 


LL 


TRATAMIENTO DE EXCEPCIONES 


En grandes sistemas el tratamiento de errores es de significativa impor- 
tancia. Cada programa está formado por dos clases de partes: aquellas par- 
tes que implementan el algoritmo general y aquellas otras que gestionan 
los errores (terminación anormal del algoritmo). Los programas en los 
cuales estas dos partes intervienen son, evidentemente, más complejos que 
aquellos otros en los cuales estas dos partes están separadas. Ada propor- 
ciona un mecanismo de tratamiento de excepciones que hace posible se- 
parar estas dos clases de partes de un programa. En Ada, el código de tra- 
tamiento de errores siempre es la última parte de un bloque de programa, 
separado de la parte general. 


INTERFACES CON EL HARDWARE 


En la mayoría de los lenguajes no se proporciona un medio para la re- 
presentación de las interfases hardware. Este soporte sólo puede encon- 
trarse fuera del lenguaje, normalmente utilizando codificación en lengua- 
je ensamblador. 

Ada proporciona facilidades tales como representar estructuras lógicas 
sobre representaciones físicas, datos pueden ser representados sobre di- 
recciones particulares y las entradas pueden ser representadas sobre in- 
terrupciones particulares. 
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ELEMENTOS, TIPOS DE DATOS 
Y DECLARACIONES DE OBJETOS 


Jl 


ELEMENTOS DEL LEXICO 


DA tiene una estructura léxica bien definida, la cual for- 
ma su base y que permite mejorar la inteligibilidad del len- 
guaje y su transporte a otras máquinas. El texto de un pro- 
grama Ada está basado en un conjunto de elementos que 
comparten una serie de características comunes, tales 
como: 

— Para el conjunto de caracteres el texto de un pro- 
grama solamente puede incluir caracteres gráficos ASCII. 

— El conjunto completo de caracteres (gráficos y ca- 
racteres de control) puede ser utilizado a través de tipos predefinidos. 

— No se requieren marcas de continuación para seguir con el texto 
del programa a través de sucesivas líneas. 

— Espacios y líneas en blanco se permiten para mejorar la lectura de 
los programas. 

Los elementos del léxico de Ada que permiten la construcción de pro- 
gramas en este lenguaje se dan a continuación: 


Delimitadores 


Utilizados como separadores y operadores. Dentro de éstos tenemos los 
simples y compuestos. 
Delimitadores simples: 
€” ( Y, -./:3<=> 
Delimitadores compuestos: 
=>, Mim /2= >= <xm << >> <> 


Identificadores 


Utilizados como nombre de las entidades dentro del texto del progra- 
ma. Deben comenzar con una letra, si bien los sucesivos caracteres pue- 
den ser letras, dígitos o subrayado. 
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El subrayado solamente puede aparecer entre dos letras o dígitos o en- 
tre una letra y un dígito. Las letras mayúsculas o minúsculas son tratadas 
de la misma forma. Los identificadores pueden ser tan largos como una lí- 
nea e incluyen nombres definidos por el usuario y palabras reservadas. 


Literales enteros 


Representan un literal numérico sin punto decimal. Los valores permi- 
tidos son los números positivos y el cero. Pueden representarse en cual- 
quier base de 2 a 16. Deben comenzar con un dígito (el subrayado está per- 
mitido entre dígitos). 


Literales reales 
Representan un literal numérico con punto decimal. Los valores per- 
mitidos son los números positivos y el cero. Pueden representarse en cual- 


quier base de 2 a 16. Pueden tener exponente positivo o negativo y deben 
comenzar con un dígito (el subrayado está permitido entre dígitos). 


Caracteres 
Representan uno de los 95 caracteres gráficos (ASCIT). 


Este tipo de datos es un tipo carácter. Se construyen literales de carac- 
teres encerrando un simple carácter entre apóstrofos. 


Cadenas 
Representan una secuencia de cero o más caracteres encerrados entre 


comillas. Deben colocarse en un simple y las comillas pueden ser inclui- 
das en la cadena colocando dobles comillas. 


Comentarios 


No tienen efecto sobre el programa. Comienzan con dos guiones segui- 
dos y el comentario se extiende hasta el final de la línea. 


Veamos algunos ejemplos: 
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Identificadores: 


Librería de 


matemáticas  — el nombre de un paquete 

Coseno — el nombre de una función 

Velocidad — el nombre de una variable 
Enteros: 

4567 — un valor de 4.567 

4 567 — el mismo valor anterior 

2500 — un valor de 2.500 

25E2 — el mismo valor anterior 

241111 11114  — notación en base 2 para el 255 

164FFA — notación en base 16 para el 255 

Reales: 

3456.0 — un valor real 3.456,0 

3 456.0 — el mismo valor anterior 

26.0E2 — un valor de 2.600,0 


241111 1111.04 — notación en base 2 para el 255 


Caracteres: 
'A? — letra mayúscula A 
ta' — letra minúscula a 
NS — Carácter espacio 
Cadenas 
«Esto es una cadena» «B»  — Esto es la cadena B no el carácter B 


Cuando todos estos elementos se unen forman las instrucciones espe- 
cíficas, las declaraciones y las unidades de programa. Algunos fallos se pro- 
ducen cuando intentamos utilizar una palabra reservada como identifica- 
dores definidos por el usuario. Se recomienda revisar la lista de palabras 
reservadas para evitar estos errores. También se recomienda utilizar iden- 
tificadores que sean coherentes con el tipo de aplicación que se está des- 
arrollando, se debe huir de identificadores complejos y rebuscados. De 
igual manera, la indentación y el espaciamiento ayudan a una mejor lec- 
tura del programa. 
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Delimitadores 


Identificadores 


Literales enteros 


Literales reales 


Caracteres 


Cadenas 


Comentarios 


Fig. 1. Construcciones de programas en ADA. 


Tipos de datos 


Ada posee una amplia variedad de tipos de datos. El lenguaje permite 
al usuario definir sus propios tipos de datos utilizando la sintaxis que mos- 
traremos al final del libro. Como con cualquier otro lenguaje de progra- 
mación, Ada proporciona al usuario un número de tipos definidos por el 
lenguaje y que pueden utilizarse en el desarrollo normal de un programa. 
A continuación damos una visión general de los tipos de datos soportados 
por Ada 


Acceso 


Fig. 2. Tipos de datos en ADA. 


Tipos de datos 


Caracterizan un conjunto de valores y el conjunto de operaciones per- 
mitidas sobre ellos. 
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Tipos escalares 


Tienen un orden predefinido con un margen de valores contiguos. Den- 
tro de los tipos escalares tenemos los discretos, enumerados, carácter, en- 
teros, reales. 


Tipos discretos 


Representan valores dentro de un número finito de posiciones discre- 
tas. 


Tipos enumerados 


Representan un conjunto ordenado de diferentes valores especificados 
por su lista. 


Tipos carácter 


Representan tipos enumerados en los cuales uno de sus valores permi- 
tidos es un carácter. 


Tipos enteros (tipo numérico) 


Representan un conjunto consecutivo de enteros sobre un limitado 
margen de valores. 


Tipos reales 


Representan una aproximación a valores numéricos continuos del 
mundo real dentro de una precisión especificada. Entre ellos tenemos los 
tipos en coma flotante y en coma fija. Los primeros presentan errores de 
precisión que varían con la magnitud del valor representado. Los segun- 
dos tienen errores de precisión constante para todos los valores represen- 
tados. 


Tipos compuestos 
Poseen una estructura formada por otro tipo de datos cuyos valores se 
determinan por los valores de sus componentes. Entre éstos tenemos los 


tipo array y tipo registro. 
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Tipo array 


Representan un conjunto indexado de componentes similares. 


Tipo registro 


Representan un conjunto de componentes de tipos diferentes. 


Tipo acceso (punteros) 
Poseen valores que designan objetos de otros tipos. 
Tipos privados 
Poseen valores cuya representación fundamental es transparente (ocul- 


ta) al usuario del tipo. 


Tipos tareas S 


Poseen valores que designan tareas. 
Veamos algunos ejemplos de estos tipos de datos: 


Programa 1. Ejemplos de distintos tipos de datos. 


Los registros con discriminantes permiten modificar la estructura de 
los objetos del registro. 
Un ejemplo de esto puede ser: 


type BUFFER (TAMAÑO : TAMAÑO BUFFER:=100) is 
record 
POS: TAMAÑO BUFFER:=0; 
VALOR: CADENA (1..TAMAÑO); 
end record; 


Los tipos de registro pueden ser componentes de otros tipos, incluyendo 
tipos registro o tipos array. 


== "Ejemplos de tipo privado 
type CLAVE is private 
Un——tipo privado solamente puede ser declarado en un número 
limitado de sitios, normalmente en la especificación de un 
paquete en el cual exista una parte privada: 
package CLAVE_NUMERO is 
type CLCAVE-is private 
CLAVE_NULA +: constant CLAVE; 
procedure OBTENER CLAVE (kiout- CLAVES; 
private 
== declaraciones completas de-tipo 
type CLAVE is new NATURAL; 
CLEAVE-NULA—=—constant- CLAVE: =4; 
end CLAVE_NUMERO; 


Programa 2. Ejemplo de tipos acceso y privado. 


Un tipo privado tiene un conjunto restringido de operaciones permiti- 
das. Podemos además restringir estas operaciones haciendo el tipo priva- 
do limitado. 


type NOMBRE is limited private; 


-- Ejemplos de tipos tarea 
task type RECURSOS-i1s 
entry TAMAÑO; -- las entradas definen los puntos 


==ode interacción entre tareas 
entry LIBERAR; 
end RECURSOS: 
task type TECLADO is 
entry LEER-—(ECrout”- CARACTER); 
==—parámetros pueden ser pasados en estos 
== puntos de entrada entre tareas. 
entry ESCRIBIR —(C: in CARACTERI3 
end TECLADO: 


Programa 3. Ejemplo de tipo privado limitado. 
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Una declaración de subtipo añade una restricción a un tipo de datos, 
sin introducir un nuevo tipo de datos diferente. Los objetos de un subtipo 
pueden ser mezclados con objetos de su tipo base u otro subtipo de su tipo 
base. Tales mezclas no requieren conversiones de tipo. La declaración de 
un subtipo es de la forma: 


subtype Nombre del subtipo is Nombre del tipo base 


Los tipos derivados crean un tipo distinto de dato. La forma general de 
este tipo es: 


type derived Nombre de tipo is new Nombre del tipo base 
Veamos algunos ejemplos: 


subtype PEQUEÑO ENTERO is INTEGER range -10..10; 
subtype ARCO IRIS ¡is COLOR range ROJO..AZUL; 
subtype CUADRADO is MATRIZ (1..15,1..15); 


En este último ejemplo la restricción sobre el tipo array aplica sola- 
mente a los márgenes de los índices para tipos no restringidos. 
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DECLARACION DE OBJETOS 


Ada utiliza el concepto de objeto para referirse a las variables y cons- 
tantes existentes dentro de un programa. Los objetos pueden ser vistos 
como grandes «cajas» las cuales guardan datos que serán manipulados por 
un programa. Estas «cajas» mantienen más información que el simple va- 
lor del objeto. 

Los objetos poseen las siguientes propiedades: 


— Un identificador, que es el nombre que utilizamos para referirnos al 
objeto. 

— Un tipo de datos, que es el tipo que restringe la forma y los valores 
permitidos por el objeto. 

— Un conjunto de operaciones, que son las operaciones permitidas so- 
bre el objeto. Estas operaciones pueden ser operaciones predefinidas y las 
proporcionadas por el usuario. 

— Un valor inicial, es decir, el valor que un objeto asumirá cuando éste 
se defina. l 

— Un conjunto de atributos, que puede contemplarse como un conjun- 
to de funciones que permiten al programa tener acceso a las propiedades 
de un objeto o a su tipo de datos. 

Algunos ejemplos sobre declaración de objetos pueden ser los siguien- 
tes: 

— Los objetos pueden ser variables o constantes. 

— Declaración de variables: 
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Conjunto 
de 
operaciones 


Valor 
inicial 


Conjunto 
de 
atributos 


Fig. 3. Propiedades de los objetos. 


SUMAR, RESTAR : INTEGER; 
LONGITUD : INTEGER range 0..100 :=0; 
COLOR : BOOLEAN :=FALSE; 


— Las constantes son asignadas a valores en sus declaraciones. 


ANCHO : constant INTEGER:= 88; 
ANCHO PEQUENO : constant INTEGER:=ANCHO/I15; 


— Múltiples objetos pueden ser declarados en una única declaración. 


AZUL,ROJO: NOMBRE COLOR:= new COLOR (TINTE => Fuerte); 
sería equivalente a: 


AZUL: NOMBRE COLOR:= new COLOR (TINTE => Fuerte); 
ROJO: NOMBRE COLOR:= new COLOR (TINTE => Fuerte); 


— En la declaración de objetos array se debe incluir un índice que res- 
trinja el tipo de array. 


CUADRADO : MATRIZ (1..10,1..15); 
— Pueden inicializarse valores de un array. 
X: TABLA := (3,4,5,6,0) -X(1)=3,X(5)=0 
— Variables registro. 


MAÑANA,PASADOMAÑANA:FECHA; 
GRANDE : BUFFER(100); -restringido a 100 caracteres 
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UNIDADES DE PROGRAMA 
Y DECLARACIONES 


N este capítulo estudiaremos las piezas básicas que cons- 
tituyen un programa Ada, su estructura general y la for- 
ma de declarar cada una de estas piezas. 


UNIDADES DE PROGRAMA: 
SU ESTRUCTURA 


En el lenguaje Ada, todas las unidades de programa tie- 
nen la misma estructura lógica. Sin embargo, pueden existir algunas va- 
riaciones en la realización física de algunas unidades de programa indivi- 
duales. Cada unidad de programa consiste en: 


LL 


ESPECIFICACION 


Esta parte de la unidad de programa describe a las personas que harán 
uso de la unidad de programa «que hace la unidad de programa». 


CUERPO 


Esta parte detalla cómo la unidad de programa llevará a cabo la imple- 
mentación de operaciones, algoritmos o estructuras recogidas en la parte 
de especificación. 


El motivo de separar la especificación del cuerpo es incrementar la fia- 
bilidad y mantenibilidad de los programas. La fiabilidad de un programa 
aumenta, ya que una causa muy común de error, «errores de interfase», 
pueden fácilmente ser detectados en tiempo de compilación y no es nece- 
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sario esperar a detectarlos cuando se producen las pruebas del sistema. La 
mantenibilidad de un programa se incrementa, ya que si se producen cam- 
bios en ciertos detalles de la implementación, éstos se restringen al cuer- 
po de la unidad de programa sin que esto afecte al usuario de la unidad 
de programa. 


Fig. 1. Estructura general de una unidad de programa. 


Como unidades de programa tenemos las siguientes: 


Subprogramas. 
Procedimientos. 
Funciones. 
Paquetes. 
Tareas. 


LLO 


GENERICOS 


A continuación damos una serie de características y uso de las unida- 
des de programa. 


* Los subprogramas son las estructuras básicas ejecutables de un pro- 
grama. Pueden tener la especificación y el cuerpo separados. La especifi- 
cación constituye la «interface», y el cuerpo, la implementación. Los usos 
de esta unidad de programa se extienden a los programas principales, de- 
finición de algoritmos y operadores. 

* Los procedimientos definen una secuencia de acciones y se invocan 
a través de una llamada al procedimiento. 


Ul 
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Fig. 2. Unidades de programa en ADA. 


* Las funciones definen un cálculo retornando un valor. Se invocan 
desde el interior de una expresión. 

* Los paquetes son las unidades estructuradas básicas de Ada. El cuer- 
po y la especificación están separados. La parte visible o especificación es 
accesible al usuario del paquete y puede contener declaraciones de tipos, 
constantes, subprogramas, tareas, etc. La parte de implementación es ocul- 
ta al usuario. Los usos del paquete van desde establecer conexión entre 
grupos de unidades de programa a los tipos abstractos de datos. 

* Las tareas se ejecutan concurrentemente con otras tareas. Se utili- 
zan en Ada para dar soporte a los procesos concurrentes. Poseen mecanis- 
mos para la sincronización y la transmisión de datos. Sus usos se extien- 
den a la concurrencia de acciones y procesos, el acceso controlado a re- 
cursos compartidos, la gestión de interrupciones y a los buffers, colas y pi- 
las FIFO. 

* Los genéricos son esquemas parametrizados de otras unidades de 
programa. En Ada un esquema de programa puede escribirse como una 
unidad de programa genérica formada de una cláusula genérica que pre- 
cede a un subprograma, un paquete o una tarea. La cláusula genérica es- 
pecifica los parámetros genéricos, que pueden ser datos (expresiones, va- 
riables o constantes), parámetros tipo, parámetros procedimiento o pará- 
metros funciones. Los principales usos de los genéricos son la reutilización 
de componentes y las librerías. 
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Veamos algunos ejemplos de las unidades de programa mencionadas 
hasta el momento: 


Proporcionan 
operaciones 
y tipos predefinidos 


Proporciona servicios 
de apoyo a la ejecución 


Fig. 3. Esquema de un programa ADA. 


A 
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else 


BINDICET7="B=INMDICE—*—1T3 
B-ESPACIOCB-INDICEI=—A3 
end if; 
exception 
when CONSTRAINT_ERROR => raise; 
end FUSH; 
——Eunciones 


ESPECIFICACIÓN 
function” PRODUCTO” DERECHOS TZOUTERDO—=3 VECTOR) return REAC; 
RED 
function-PRODUCTO DERECHO, TZQUTIERDO: VECTOR) EBturn REAL iS 
SUMAT7REAL:=M.0 
for J-in IZOQUIERDO”RANGE 1005 
SUMA: =SUMA -+- TIZQUIERDO(J) * DERECHO(J); 
end. 10093 
return SUMA; 
end PRODUCTO:s 


== Paquetes 

ESPECIFICACION DEL PAQUETE 

package GESTION-VECTORiS 
subtype indice is INTEGER range M.. INTEGER'LAST; 
type vector is array (indice range “> of FLOAT; 
Dimension exception; 
IA ANA 
function" (uv in vector) return vector; 
function“ uv: in vector return vector; 
function": 1x0 FCEOAT3 xx: in vector” return vector; 
function PROD” CU; CiO VBcotor) return FLOATy 

end-GESTION VECTOR; 


CUERPO DEL” PAQUETE 
package body GESTION_VECTOR is 
function "+" (u,v: in vector) return vector is 
dim: constant INTEGER+= u"LENGTH: 
wo vector Hiidim)5 
begin 
TÉ Y LCENSTH 7=- dim then” rarse- Dimension; end" If; 
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for icin 1..dim loop w(1):=u(1)+v(1);- end loops 
return w;3 
end "+"; 
function "*" (xria FLOATÍ3 v: in vector) return vector- is 
dim: constant INTEGER:=v"LENGTH; 


w:vector(1..dim); 


begin 
for i in t..dim loop w(i)>:+=x * v(i)5 end loop; 
return w; 
eng; 


function PROD-tu,v: in vector) return FLOAT-13 
dim constant INTEGER:=-u"LENGTH; 
sum: -FLOAT=2= M0; 
begin 
if v'“LENGTH /= dim then raise Dimension ; end if; 


for i in 1..dim loop sumi=sum + u(i) * v(i)jend loop; 
return sum; 
end PRODy 
end GESTION_VECTOR; 


Tareas 

ESPECIFICACIÓN DE LA TAREA 

task type Correocis 
entry DEPOSITAR (msg: in mensaje): 
entry SACAR (msg : in mensaje); 

end Correo; 

CUERFO DE-LA TAREA 

task body Correo is 


capacidad: constant :=24; 


subtype indice is INTEGER range 4%.. (capacidad - 1); 


supyjinf : indice :=4; 


numemen + INTEGER range W..capacidad :=W; 


caja + array flindice) of mensaje; 
begin 
Loop 
select 


when —numemen <-capacidad => 


accept DEPOSITAR (msg : in mensaje) du 


caja(sup):=msq; 


sup:=(sup + 1) mod capacidad; 
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numemen2=- numemen +13 
end DEPOSITAR; 
or 
when numemen- > M => 
accept SACAR (msg : out mensaje) do 
msg += cajalin+); 
inf 1= tinf + 1) mod capacidad; 


numemen-3=-numemen 1-4 


end Correo; 


En este - ejemplo suponemos que el 


i 
E 


definido: 


=— bBenricos 
ESPECIFICACION-DE-—GENERICOS 


generic 
package PARES 1s 
type par is privatez 
function ENSAMBLAR (x.y im ELGQAD) return-pari 
function + (uy 3 in par return pari 
private 
type par is record der,izg : ELOATí¡ end record 


end PARES; 


CUERPO DEL GENERICO 


package body PARES is —T no visible al usuario 
generic with function "2£"(x,ys in FLOAT) ceturn FELOAT; 
function OPERAPAR(u,v: in par) ceturn par; 

function ENSAMBLAR xy: in FLOAT) ceturn paris 
begin return (xy); end ENSAMBLAR; 

function "+*—(u;vz in par) ceturn par is 

new OPERAPAR ES 

=-=—Implementación de OPERAPAR 

function -OPERAPAR (UV 3-16 par) return par is 


begin return (u.izq £ V.i2q, uU-der Y v.der);end OPERAPAR; 


end PARES; 
>- Procedimientos 


ESPECIFICACION 
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procedure FUSH-(A+ in ELEMENTOS Br ia out PILA 


CUERFO 
procedure PUSH-—(Ar— in ELEMENTOS Bin out PILA)—is 
begin == comenza parte ejecutable 


1f—B.INDICE-=-—BTAMAÑO-—ther 
raise DESBORDAMIENTO: 
else 
B-IMDICE-23="B-INDICE-+*-13 
B.ESPACIO(B. INDICE):= As 
end i4; 
exception 
uhen CONSTRAINT-ERROR => raise; 


end PUSH; 
-=— Funciones 
ESPECIFICACIÓN 
function PRODUCTO (DERECHOS IZQUIERDO: VECTOR) return REAC; 
£UERPO 
function PRODUCTO (DERECHO, IZQUIERDO: VECTOR) Feturn REAL is 
SUMATREAC:I=00 
for—J=ip-IZQUIERDO“RANGE 1o00p 
SUMA:=SUMA=+-TZQUIERDOCI)* DERECHO(I)3 
end loop: 
return SUMA; 
$n8-FRODUCTO 


-- Faquetes 

ESFECIFICACION DEL PAQUETE 

package GESTION_ VECTOR 15 
subtype-1ndice” 13 INTEGER range Y; INTEGER“CAST: 
type vector” is array (indice range 23 Df FLOAT; 
Dimension texception; 
A A 
function “*x". (uy, vi in vector) return vector; 
function "/" (u,yve in vector) return vector; 
function" bn FEDATy vin vector) return vector; 
function PROD-tusvicin-vector)- return FEODAT; 

end GESTIÓN VECTOR; 


CUERFO DEL PAQUETE 
package body GESTION VECTOR is 
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function-"+" -(uyvi in vector) return vector is 
dim: constent INTEGER:= u"LENGTH; 
wo vector (l..dim:; 
begin 
14 v LENGTH /= dim then raise Dimension; end i4; 
ftorcraintdamtoop- w1)+=u04)+vY4)-end- Loops 
CELUCOW; 


ends 


FUNERARIO COAT O Ne C tor) return” vector” is 
dim COAsStant INTEGERI=Y "LENGTH : 


wivector (1..dim)¿ 


begin 
for icin 1..dim loop w(i):=x * v(i); end loop; 
return wi 


eng : 
function PROD-ttuvicin vector? returr FEDAT-1s 
dim cpnastant  INTEGER:=-—u LENGTH; 
som FLODAT==234; 
begin 
FI CLIENGTH==0im then raise Dimension 3 end 1f; 


for i-ió 1..dim 100p sum:i=sum + u(i) * v(iJiend 100p: 
return sum; 
eng FROD; 
end GESTION_VECTOR; 


=- Tareas 


SP FICACION DE LA TAREA 
task type forreo—is 
entry DEPOSITAR (msg : in mensaje); 


entry. SACAR —(msg-— 3 in mensaje); 

end Correo; 

LUERFO-DE-LA-TAREA 

task body Correo is 
capacidad: constant 1=2473 
subtyps indice is INTEGER range 0... (capacidad - 1); 
sup, inf -:- indice 1=0; 
humemen : INTEGER range 4%..capacidad :=0; 
caja : array (indice) of mensaje; 

begin 

loop: 
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select 

when numemen Y capacidad => 

accept DEPOSITAR- (msg + in mensaje) do 
cajalsup):1=msg; 
sup+=tsup-+-12—mod- capacidad; 
numemnen3= numemen+143 

end DEPOSITAR; 

or 
a4hen nunemen—>Mo=> 


accept SACAR (msg : out mensaje) do 
msq := cajalin+); 
inf ¿= (inf + 1) mod capacidad; 
numemen -+=-numemen — 1-3 
end SACAR 
end select; 
end 1o0p; 


end Correo; 


En este ejemplo suponemos que - el tipo —"mensaje" 


definido. 
— benricos 
ESPECIFICACION DE GENERICOS 
generic 
package PARES is 
type par is private 


está 
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function ENSAMBLAR Guy: im ELGAD- return pars 
A A A 
private 
type par is record derizg” : FLOATi3 end record 
end FARES3 


CUERPO DEL GENERICO 


package body FARES is 7 no visible al usuario 


generic with function "2%" (x,y+ in FLDAT) return FLOAT; 
function OPERAPAR (uva in par) A 

function ENSAMBLAR (ys 7 FLOAT) return par is 
begin return tx:y)+ 5 end ENSAMBLAR:S 

function *+* —(u;vzcin- par) return par” 13 

new" OPERAFAR— +) 

—— Implementación de ODFERAPAR 


Programa 1. Ejemplo de unidades de programas. 


DECLARACION DE LAS UNIDADES 
DE PROGRAMA 


En Ada, el trabajo asociado con un programa se desarrolla por los dis- 


— Asociar un nombre con la unidad. 

— Especificar la «interface» a los servicios que proporciona la unidad 
de programa. 

— De manera indirecta, especificar los servicios que proporciona la 
unidad de programa. Esta especificación es indirecta, ya que los servicios 
son solamente identificables por el nombre que se le da a la unidad de pro- 
grama y los parámetros que se especifican. 


La sintaxis y características de las diferentes formas de unidades de pro- 


== DECLARACION DE SUBPROGRAMAS 


Los procedimientos pueden tener cualquier número de parámetros for- 
males. Podemos restringir cómo se van a usar los parámetros en el inte- 
rior del procedimiento, indicando el modo del parámetro. 


Programa 2. Ejemplo de procedimiento. 
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Los parámetros de las funciones son siempre de modo in, de manera 
que los parámetros formales sólo pueden leerse en el interior del cuerpo 
de la función. 


function AZAR return ALEATORIO; 
function MINIMO (Y: ENLAZAR) return CELDA; 


DECLARACION DE PAQUETES 


Las especificaciones del paquete definen la interfase con el usuario del 
paquete. En general, un paquete puede verse como una unidad que pro- 
porciona un conjunto de servicios a los usuarios de dicho paquete. Los pa- 
quetes pueden utilizarse para dar definiciones de tipos abstractos de datos 
(tad). 


Fig. 4. Paquetes. 


Programa 3. Ejemplo de paquetes. 


Para 


definir 


Ti; 
abstractos 
de datos 


Fig. 5. Utilización de paquetes. 


LL 


DECLARACION DE TAREAS 


Las especificaciones de tareas definen la interfase entre una tarea o tipo 
de tarea y otras tareas. La interfase ve a las tareas del usuario como un con- 
junto de procedimientos que se denominan entradas («entries»). Una sen- 
cilla declaración de tarea es equivalente a declarar un tipo de tarea (sin 
nombre). 

Veamos cómo se especifica una simple tarea: 


task RECOLECTAR is 

entry RECOGER (v: out ELEMEN); 
entry SEMBRAR (u: ¿in ELEMEN); 
end RECOLECTAR; 


La declaración de tareas como objetos tarea, permiten incluirlas en una 


=— PRAGMAS Y ESPECIFICACIONES DE TAMAÑO 


Las «pragmas» son directivas de compilador que se utilizan para dar in- 
formación a éste y que aparecen donde existen declaraciones, pero no son 
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declaraciones como tales. Al final del libro se da una relación de las prag- 
mas contempladas en Ada, así como sus características. 


Información 


AL 


Fig. 6. Pragmas. 
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EXPRESIONES, OPERADORES 
E INSTRUCCIONES 
EN LENGUAJE ADA 


FORMAS Y USO DE EXPRESIONES EN ADA 


AS expresiones en Ada proporcionan el mecanismo ade- 
cuado para el cálculo de un valor. La expresión puede 
contemplarse como un cálculo que, cuando se ejecute, de- 
volverá algún tipo de dato condicionado por las reglas del 
lenguaje y la forma de la expresión en sí misma. Las ex- 
presiones en Ada se utilizan para una gran cantidad de co- 
sas y entre las cuales citaremos: condiciones para instruc- 
ciones de control, parámetros actuales pasados a unida- 
des de programa, etc. 

Los nombres son utilizados dentro de una expresión para referirse al 
valor de un objeto o el valor devuelto por una función. Ejemplos de nom- 
bre pueden ser: 


CONTADOR — nombre sencillo de una varia- 
ble escalar. 

PI — nombre de un número. 

DIA.MES — el componente de un registro. 


COCHE.MATRICULA.PROPIETARIO — un componente de un regis- 
tro de un componente de un re- 
gistro. 

COLOR'"FIRST — el valor mínimo del tipo enu- 
merado COLOR l 

FECHA'SIZE — número de bits para registros 
de tipo FECHA. 

MENSAJE'ADDRESS — dirección del registro tipo 
MENSAJE. 


Dentro de las expresiones nos encontramos con las llamadas expresio- 
nes primarias, tales como: 


410.0, que es un literal real 
DIV, que es una variable 
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COSENO (X), que es una llamada a función 


De igual forma podemos encontrarnos con distintas formas de expre- 
siones, tales como: 


CONTAR in ENTERO, que es una relación 
A**(B**C), que es una expresión 
(ROJO and AZUL) or BLANCO, que es una expresión 


También pueden aparecer en Ada operadores y evaluación de expre- 
siones, tales como: 


abs (2 + C) + T 
y < 8.0 and x > 56.0 es lo mismo que poner 

(y < 8.0) and (x > 56.0) 

A**(-2) en este caso el paréntesis es necesario 

X/B * M idéntico a (X/B) * M 

Los operadores relacionales y lógicos pueden tomar las siguientes for- 
mas: 


FRIO or CALOR 

ESTRUCTURA (1..12) and ESTRUCTURA (1..12) 

“BB” < “C” and “C” < “D” es verdadero 

M not in 0..20 se prueba si M está dentro de rango 

NUMERO__1 = NUMERO__2 verdadero si ambos comparten el mismo 
número. 


El control de rupturas puede expresarse así: 
MES.DIA /= null and then MES.DIA.HORA > 30 


En este ejemplo la parte de la expresión después de and then no se eva- 
lúa si la primera parte se evalúa como falsa. 


A =0 or else P(A) = VALOR_ SUPERIOR 


En este ejemplo la parte de la expresión posterior al or else no se eva- 
lúa si la primera parte se evalúa como cierta. 
Los operadores de adición binaria pueden tomar la forma: 


“X” €: “Y” da como resultado “XY” 
Los asignadores se expresan de la forma: 


new TABLA ” (0,null null) inicializado explícitamente 
new NOMINA no está inicializado 


Las expresiones utilizadas para inicializar objetos son de la forma: 


PEDRO: NOMBRE__VARON:= new NOMBRE (SEXO = HEMBRA); 
FRASE: constant CADENA := “HOLA ME LLAMO ANA”; 


70 


INSTRUCCIONES 


Las instrucciones en Ada se utilizan para desarrollar acciones básicas, 
acciones en tiempo real y para la implementación de una lógica de control. 


Control 


Orientadas 
a 
tareas 


Fig. 1. Instrucciones en ADA. 


Estudiaremos, a través de ejemplos, las distintas instrucciones utiliza- 
das en Ada. 


LL 


INSTRUCCIONES BASICAS 


Entre éstas tenemos las instrucciones de asignación y null. La primera 
proporciona un nuevo valor a una variable 


nombre de variable := expresión; 


La instrucción null indica la ausencia de acciones. 


Asignación 


Null 


Fig. 2. Instrucciones básicas 
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IN 


INSTRUCCIONES PARA EL FLUJO DE CONTROL 


Fig. 3. Instrucciones de flujo de control. 


Entre las instrucciones de flujo de control tenemos: 


* IF 

if condición 

then 

conjunto de sentencias 
else 

conjunto de sentencias 


end if; 
* CASE 


Selecciona una secuencia de instrucciones de varias alternativas que 
se excluyen mutuamente y basadas en el valor de una expresión discreta. 


case expresión is 

when opción = sentencias 
when opción = sentencias 
when opción = sentencias 
when others = null; 

end case; 


«Opción» puede ser un simple valor o un rango de valores de tipo dis- 
creto o la palabra others. 


* LOOP 


Esta instrucción controla la ejecución reiterada de un grupo de senten- 
cias. La ejecución puede repetirse cero o un número determinado de ve- 
ces. 


loop 

sentencias 

end loop; 

for. parámetro del bucle in rango 
loop 


dz 


sentencias 
end loop; 
while condición 
loop 
sentencias 
end loop; 


* EXIT 


Solo tiene existencia dentro de un bucle loop. Con esta instrucción el 
control se transfiere a la parte final del bucle. 


exit when condición; 


* GOTO 


Con esta instrucción se produce un salto incondicional a una instruc- 
ción etiquetada. 


goto etiqueta; 


* RETURN 


Esta instrucción nos indica el punto de terminación de un subprogra- 
a. 
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return —en un procedimiento 
return expresión —en una función 


* RAISE (Excepción) 


Esta instrucción da lugar a una «excepción» y pasa control al manipu- 
lador de excepciones. 


raise nombre de la excepción; 


LL 


INSTRUCCIONES ORIENTADAS A TAREAS 


* ACCEPT 


Identifica la porción de programa que se ejecutará durante un «rendez- 
vous» (procesos paralelos) 


accept nombre__entrada do 
sentencias —ejecutadas durante rendezvous 
end nombre__entrada; 


* ABORT 


Provoca la terminación anormal de una o más tareas y de esta manera 
se evita el procesamiento paralelo con esas tareas. 
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Abort 


Select 


Fig. 4. Instrucciones orientadas a tareas. 


abort nombre__tarea; 
* DELAY 


Suspende la ejecución de la tarea, como mínimo, el tiempo especifica- 
do en ella. 


delay expresión; 
* SELECT 


Esta instrucción controla, de todos los procesos paralelos alternativos, 
cuál de éstos será ejecutado. 


select 

instrucción de llamada (“entry call”) 
sentencias 

or 

delay expresión; 

sentencias 

end select; 


Veamos algunos ejemplos de las instrucciones anteriores: 


Programa 1. Ejemplo de instrucciones de control. 


Programa 2. Ejemplo de bloque. 


En este ejemplo se pone de manifiesto que la noción de bloque nos per- 
mite introducir una nueva región en la parte ejecutable de una unidad de 
programa. 
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ul 


Programa 3. Ejemplos de goto, return y raise. 


INSTRUCCIONES ORIENTADAS A TAREAS 


Las instrucciones accept definen las acciones que se producirán cuan- 
do otra tarea llame a la entrada indicada. 


Programa 4. Ejemplo de instrucciones orientadas a tareas. 


Especifica que DEPOSITAR y SACAR se ejecutan alternativamente. 
A cada DEPOSITAR le sigue un SACAR, y cada ejecución de SACAR va se- 
guida por un DEPOSITAR. 

Otra instrucción orientada a tarea es la delay 


Programa 5. Ejemplo de la instrucción DELAY. 


La instrucción select permite escribir una tarea de forma que puedan 
aceptarse «entradas» (entry call). 


vá 


N 


Programa 6. Ejemplo de «select». 


El efecto de esta instrucción es que tanto DEPOSITAR como SACAR se 


ejecutan de forma que ambas se comportan como secciones críticas una 
con respecto a la otra. 


TAREAS Y TRATAMIENTO 
DE EXCEPCIONES 


LAS TAREAS Y EL CONCEPTO DEL 
< <RENDEZVOUS> > 


A 


AS tareas representan el conjunto más complejo de carac- 
terísticas del lenguaje Ada. Resumiremos, a grandes ras- 
gos, algunas de las características más importantes de las 
tareas: 

1. Las tareas representan líneas paralelas del progra- 
ma de control que «correrán» concurrentemente en tiem- 
po real sobre un multiprocesador o en tiempo real (apa- 
rente) sobre un simple procesador. 

2. Toda la planificación, en tiempo de ejecución, de 
las tareas se gestiona por el <<entorno>> cuyas características e imple- 
mentación son transparentes (ocultas) al programador. 

3. La activación de una tarea se controla a través de la localización 
de la declaración de la tarea dentro del programa y el tipo de declaración 
asociada con la tarea. 

4. La interacción, comunicación y datos compartidos entre tareas se 
lleva a cabo a través de un mecanismo conocido por rendezvous. 

5. Las tareas son unidades de programa, así como tipos de objetos. 

6. Se pueden declarar tipos de tareas y objetos de ese tipo, los cuales 
pueden ser considerados como un objeto. Esto significa que objetos del 
tipo tarea pueden ser pasados como parámetros en llamadas a procedi- 
mientos, declarados como componentes de un array y apuntados por ti- 
pos acceso (punteros). 

Cuando la tarea que «llama» y la tarea «llamada» tienen su llegada en 
un punto donde ambas esperan que se produzca la comunicación, este 
punto se denomina un rendezvous. 

La sincronización entre tareas se consigue por la llamada a una entra- 
da, en una tarea especificada, y respondiendo a ella dentro de la tarea lla- 
mada con una instrucción accept. Al final de la instrucción accept se ha 
completado el rendezvous. 

Un rendezvous ocurre cuando una tarea «expresa» su deseo de llamar 
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a un punto de entrada (entry point) dentro de otra tarea y esa otra tarea 
acepta la llamada de entrada. Múltiples llamadas a una entrada son pues- 
tas en cola para un tratamiento secuencial. 

El mecanismo del rendezvous podemos describirlo de la siguiente ma- 
nera: 

— Los parámetros actuales in e in out del punto de entrada se copian 
dentro de los parámetros formales de la instrucción accept. 

— Las sentencias internas a la instrucción accept son ejecutadas. 

— Los parámetros formales in out y out de la instrucción accept se co- 
pian de nuevo en los parámetros actuales del punto de entrada, comple- 
tando la ejecución. 


La interacción 
se lleva a cabo 
a través del 
«rendezvous» 


La activación 
se controla a 
través de la 
declaración 


Planificación 
gestionada por 
el entorno 


Líneas paralelas 
de programa 


Fig. 1. Características de las tareas. 


Cuando una tarea quiere retardarse puede emplearse la instrucción de- 
lay. 
delay expresión; 


donde expresión es una simple expresión de tipo «duración» expresada en 
segundos. 

El incremento más pequeño de «duración» no debe ser superior a 20 
milisegundos. 

Puntos de entrada con retardo permiten a las tareas desarrollar algu- 
nas otras acciones si su punto de entrada no es aceptado en un momento 


determinado. 
select 


instrucción de punto de entrada; 
secuencia de instrucciones 
or 
delay expresión de retardo; 
secuencia de instrucciones 
end select; 
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Si el rendezvous puede comenzar dentro del retardo especificado aquél 
comienza y la primera secuencia de instrucciones se ejecuta. Por otra par- 
te, el punto de entrada es cancelado después de que el retardo especifica- 
do haya expirado, ejecutándose la segunda secuencia de instrucciones. La 
cancelación del punto de entrada lleva consigo la eliminación de la llama- 
da de la cola de entrada. 

Los puntos de entrada (condicionales) permiten a las tareas desarrollar 
otras acciones si en el punto de entrada no se produce un rendezvous. 


select 
punto de entrada; 
sentencias; 
else 
sentencias; 
end select; 


Si la tarea llamada puede establecer un rendezvous con la tarea llaman- 
te, de forma inmediata, entonces el rendezvous se producirá y la primera 
secuencia de instrucciones se ejecutará. 

Por otra parte, si el rendezvous no puede producirse, entonces el pun- 
to de entrada se cancela y la segunda secuencia de instrucciones se ejecuta. 


DI 


TRATAMIENTO DE EXCEPCIONES 


Ada proporciona un potente mecanismo para definir las condiciones 
excepcionales que puedan ocurrir durante la ejecución de un programa. 
Algunas excepciones están ya predefinidas, pero otras pueden ser defini- 
das por el usuario. Las excepciones definidas por el usuario permiten es- 
pecificar las condiciones de error o excepcionales que son de capital im- 
portancia para el programa. 

El lenguaje Ada posee, en relación a las excepciones, las siguientes ca- 
racterísticas: 


Predefinidas 


Definidas por el usuario 


Fig. 2. Clases de excepciones. 
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Excepciones predefinidas 


Condiciones de error definidas en el lenguaje para detectar violaciones 
en los tipos de datos, errores de procesamiento, etc. 


Excepciones definidas por el usuario 


Es una facilidad para la declaración de excepciones. 


Instrucción raise 


Permite generar una condición excepcional que detiene la ejecución 
normal del programa y transfiere control a una secuencia de instruccio- 
nes que hacen un tratamiento de la excepción. 


Reglas para la propagación de excepciones 


Las reglas del lenguaje que rigen la forma en la cual las excepciones 
se propagan de un subprograma o tarea a otro. 


Manipulador de excepciones 


Es un área, dentro de una unidad de programa, donde la secuencia de 
instrucciones que lleva a cabo el tratamiento puede aparecer. 
Veamos un ejemplo de tratamiento de excepciones: 


exception 
when ERROR DATOS => null; 
raise ERROR; 
end; 


Cuando se produce una excepción, la ejecución normal del programa 
se suspende. Si existe un «manipulador» de excepciones en el interior del 
cuerpo del subprograma, bloque de instrucciones o cuerpo del paquete, 
el control se transfiere a ese manipulador. En el caso de no encontrarse 
manipuladores en la secuencia de llamada asociada con la ocurrencia, la 
ejecución del programa se detiene y el control se transfiere de nuevo al sis- 
tema operativo. Cuando se encuentra un manipulador o manejador, la eje- 
cución de éste origina la ejecución del bloque que contiene al manejador 
y a partir de aquí el flujo normal del programa continúa. 
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Las excepciones modificarán la secuencia normal de un programa. 


Predefinidas 


Definidas 


por el 
usuario 


Instrucción 
RAISE 


Reglas para 
la propagación 
de excepciones 


Manipulador 


de excepciones 


Fig. 3. Excepciones en ADA. 


Programa 1. Ejemplo de excepciones. 
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abort 
and 
case 
digits 
entry 
generic 
limited 
null 
package 
range 
reverse 
terminate 
while 


34 


abs 
array 
constant 
do 
exception 
goto 
loop 

of 
pragma 
record 
select 
then 
with 


accept 
at 
declare 
else 
exit 

if 

mod 

or 
private 
rem 
separate 


type 


APÉNDICE A 


PALABRAS RESERVADAS EN ADA 


access 
begin 
delay 

elsif 

for 

in 

new 
others 
procedure 
renames 
subtype 
use 


all 
body 
delta 
end 
function 
is 

not 
out 
raise 
return 
task 
when 


APENDICE B 


SINTAXIS DE LOS TIPOS DE DATOS 


type identificador is definición de tipo 
* tipos escalares 


tipos enumerados 
type nombre del tipo is (identificador); 
tipos carácter 
type nombre del tipo is (literal); 
tipos enteros 
type nombre del tipo is límite inf ... límite sup; 
tipos reales 
— En punto flotante 
type nombre del tipo is digits número de dígitos; 
— En punto fijo 
type nombre del tipo is delta precisión 
* tipos compuestos 
tipos array 
— restringidos 
type nombre del tipo is array (margen) of subtipo; 
— no restringidos 
type nombre del tipo is array (marca range <>) of subtipo; 


tipos registro 
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type nombre del tipo is 
record 

lista de componentes 
end record; 


* tipos acceso (punteros) 
type nombre del tipo is access subtipo apuntado; 
* tipos privados 


type nombre del tipo is [limited] private; 
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APENDICE C 


PRAGMAS DEFINIDOS EN EL LENGUAJE ADA 


CONTROLLED 


Especifica que una petición de almacenamiento automático debe gene- 
rarse para el objeto apuntado por este tipo acceso (puntero). 


ELABORATE 
INLINE 


INTERFACE 


Especifica que el subprograma se codifica en otro lenguaje y se pro- 
porciona como código objeto. 


LIST 
MEMORY SIZE 


Especifica el valor utilizado para el número denominado SYSTEM.ME- 
MORY_SIZE, el cual define el número de unidades de almacenamiento 
en la configuración de la máquina («target machine»). 


OPTIMIZE 


Especifica si el tiempo o el espacio se utilizarán con criterios de optimi- 
zación. 


PACK 
De utilidad para empaquetamiento en memoria. 
PAGE 


Especifica que el texto del programa comenzará en una nueva página. 
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PRIORITY 
Especifica la prioridad de una tarea o subprograma. 
SHARED 


Especifica que cada lectura o actualización de la variable es un punto 
de sincronización para esa variable. 


STORAGE __SIZE 


Especifica el valor que se utiliza para el número denominado 
SYSTEM.STORAGE_ SIZE el cual define el número de bits por unidad de 
almacenamiento en la configuración de la máquina. 


SUPPRESS 


Toma como argumento, opcionalmente, el nombre de un objeto, tipo 
(subtipo), subprograma, tarea o genérico. 


SYSTEM__NAME 


Especifica el valor que se utiliza para la constante 
SYSTEM.SYSTEM__NAME. 
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APENDICE D 


WN 


OPERACIONES Y ATRIBUTOS EN ADA 


* OPERACIONES 


Asignación 


Asignador 


Prueba entre miembros 


not in 
Control de ruptura 


and then 
or else 


Componente seleccionado 
nombrel.nombre2 
Componente indexado 
nombre(expl) 
* OPERADORES 
Lógicos 
and or xor 
Relacionales 
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Relacionales Dita 
A > naria 


Fig. 1. Operadores en Ada. 


Suma binaria 
+ - 
Suma unaria 
+- 
Producto 
* 
Cociente 
/ mod rem 
Orden de precedencia 
** abs not 
* ATRIBUTOS DE UTILIDAD 
'FIRST 


Límite inferior de un tipo discreto. 
Límite inferior (índice 1) de un array. 


'FIRST(N) 

Límite inferior (índice N) de un array. 
'LAST 

Límite superior de un tipo discreto. 

Límite superior (índice 1) de un array. 
'LAST(N) 

Límite superior (índice N) de un array. 
'LENGTH 


Longitud (índice 1) de un array u objeto. 
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Cociente 


'LENGTH(n) 

Longitud (índice N) de un array. 
POS(X) 

Posición numérica de X dentro de la declaración tipo. 
PRED(X) 

Predecesor de X para este tipo. 
'RANGE 

Margen (índice 1) para un array u objeto. 
'RANGE(N) 

Margen (índice N) para un array u objeto. 
'SUCC(X) 

Siguiente a X para este tipo. 
"VAL(X) 

Es una función de conversión. 

* OTROS ATRIBUTOS 


Aft, Fore, Image, Last__Bit, Mantissa, 

Position, Value, Width, Address, Base, 

Constrained, Size, Storage__Size, Delta, 

Digits, Emax, Epsilon, Large, Safe__Emax, 

Safe__Large, Safe__Small, Small, Callable, Count, 
Storage__Size, Terminated, Machine__Emax, Machine__Emin, 
Machine__Mantissa, Machine__Overflows, Machine__Radix, 
Machine__Rounds. 
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APENDICE E 


UNIDADES DE LIBRERIA DEFINIDAS 
EN EL LENGUAJE 


STANDARD 


Define todas las excepciones predefinidas (excepto I/O). 
Define todas las operaciones y tipo de datos predefinidos. 
Es el paquete dentro del cual las otras unidades de librería se compilan. 


CALENDAR 


Define tipos de datos y operaciones sobre el tipo TIME. 
Utilizada en «tareas» y aplicaciones que precisan acceso a tiempo real. 


SYSTEM 
Define aspectos de implementación de un sistema Ada específico. 


MACHINE__CODE 


Define la «interface» a nivel de código máquina para la máquina objeto 
(target machine). 


UNCHECKED__DEALLOCATION 
Permite al usuario controlar las asignaciones de los objetos tipo acceso. 
UNCHECKED__ CONVERSION 
Permite conversiones a nivel de bits. 
SEQUENTIAL__IO 
Proporciona operaciones de E/S a cinta. 
DIRECT _I0 


Proporciona operaciones de E/S a disco. 
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TEXT_I0 

Proporciona operaciones de E/S legibles por el usuario. 
10__EXCEPTIONS 

Define excepciones de E/S. 
LOW_LEVEL_ lO 


Define operaciones de acceso a bajo nivel para dispositivos de E/S. 
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APENDICE F 


pl 


EXCEPCIONES DEFINIDAS EN EL LENGUAJE ADA 


Constraint__Error 
Las condiciones en que se alcanza esta excepción son: 


* Intentar asignar a un objeto un valor fuera de margen. 
* El valor de un índice está fuera de los límites. 
* Operaciones lógicas sobre arrays de diferentes longitudes. 


Data__Error 


Las condiciones en que se da esta excepción son: 


* Cuando en una operación de E/S se intenta leer un elemento que no 
es del tipo correcto o está dentro del margen permitido de valores. 


Device_ Error 

Las condiciones en que se da esta excepción son: 

* Cuando existe un mal funcionamiento del hardware de E/S. 
End__Error 

Las condiciones en que se da esta excepción son: 

* Cuando se intenta leer más allá del fin de fichero. 
Layout__Error 
Numeric__Error 

Las condiciones en que se da esta excepción son: 


* Ejecución de una operación numérica predefinida que no puede dar 
el resultado correcto (un desbordamiento, por ejemplo). 
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Program__Error 
Las condiciones en que se da esta excepción son: 


* Llamar a un subprograma cuyo «cuerpo» no ha sido desarrollado. 
* Intentar salir de una función con una instrucción distinta a «re- 
turn». 


* Otros errores de programa. 
Storage__Error 
Las condiciones en que se da esta excepción son: 


* Insuficiente capacidad de memoria para guardar nuevos objetos o ac- 
tivar nuevas unidades de programa. 


Tasking__Error 
Las condiciones en que se da esta excepción son: 


* Cuando una tarea falla durante su activación. 
* En un punto de entrada a una tarea anormal o completada. 
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APÉNDICE G 


GLOSARIO DE TERMINOS 


Acoplamiento 


Medida de la independencia entre módulos de un programa. 


Abstracción de datos 


Resultado de extraer y retener sólo las características esenciales de los 
datos. 


Asignador 


La evaluación de un asignador crea un objeto y devuelve un nuevo tipo 
acceso (puntero) el cual apunta al objeto. 


Cola 


Una lista a la que se accede de la forma «primero en llegar, primero 
en salir». 


Componente 


Valor que forma parte de otro más amplio o un objeto que forma parte 
de otro superior. 


Constante 


Un objeto cuyo valor no cambia una vez inicializado. 


Data 


Representación formal de hechos, conceptos o instrucciones que sir- 
ven para comunicación, interpretación o procesamiento por medios hu- 
manos o automáticos. 
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Encapsulación 


La técnica de aislar una función dentro de un módulo y proporcionar 
una especificación precisa para dicho módulo. 


Entrada 

Una entrada (entry) se utiliza para comunicación entre tareas. 
Excepción 

Es una situación errónea a la cual se llega durante la ejecución de un 


programa. Alcanzar una excepción supone abandonar la ejecución normal 
del programa. 


Función 


Especifica una secuencia de instrucciones y devuelve un valor llamado 
resultado. 


Manipulador (Handler) 
Una parte de un programa que especifica una respuesta a una excep- 
ción. 
Interfase (Interface) 
Un límite compartido. 
Interrupción 


Suspensión de un proceso,como podría ser la ejecución de un progra- 
ma de ordenador, causado por un suceso externo al proceso. 


Objeto 


Un objeto contiene un valor. Un programa crea un objeto bien por ela- 
boración de una declaración objeto, bien evaluando un asignador. 


Operador 
Un operador es una operación que tiene uno o dos operandos. 
Paquete 


Especifica un grupo de entidades relacionadas lógicamente, tales como 
tipos, objetos de esos tipos y subprogramas con parámetros de aquellos ti- 
pos. 


Pragma 
Suministra información al compilador. 
Parte privada 


Parte de la especificación de un paquete que contiene detalles estruc- 
turales que completan la especificación de las entidades visibles. 
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Parámetro actual 


Una entidad particular asociada con el correspondiente parámetro for- 
mal a través de una llamada a subprograma, punto de entrada (entry call), 
etcétera. 


Rango 
Conjunto continuo de valores de tipo escalar. 
Rendezvous 


Interacción que sucede entre dos tareas cuando una tarea llamó a la 
entrada (entry) de la otra tarea y una instrucción de aceptación se ejecuta 
por tarea llamada. 


Reusabilidad 


Propiedad por la cual un módulo puede ser utilizado en múltiples apli- 
caciones. 


Software de aplicación 


Software específicamente desarrollado para utilización funcional de un 
sistema informático. 


Stub 


Un módulo de programa ficticio, utilizado durante el desarrollo y prue- 
bas de un módulo de alto nivel. 


Tarea 
Opera en paralelo con otras partes del programa. 
Validación 


Proceso de evaluación del software que pretende asegurar al final del 
desarrollo el cumplimiento de aquél con los requisitos establecidos. 


Variable 


Objeto que contiene un valor que puede cambiar durante la ejecución 
del programa. 
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APÉNDICE H 


Tabla ASCII 


CONVERSION NUMERICA 


CONVERSIONES NUMERICAS 
DECIMAL-HEXADECIMAL-OCTAL-BINARIO-ASCII 


o a A AN a 0 e A 
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DEX HEX OCT 


100 


BINARIO 
PX, 


0001 1000 
1001 1001 
1001 1010 
0001 1011 
1001 1100 
0001 1101 
0.001 1110 
1001 1111 
1010 0000 
0 010 0001 
00100010 
10100011 
0.010 0100 
1010 0101 
1010 0110 
00100111 
0 010 1000 
1010 1001 
1010 1010 
0010 1011 
1010 1100 
0.010 1101 
00101110 
10101111 
0.011 0000 
1011 0001 
1011 0010 
0011 0011 
1011 0100 
0011 0101 
0011 0110 
1011 0111 
1011 1000 
0.011 1001 


o ASE ESA 


0011 1010 : 
1011 1011 ; 


0011 1100 
1011 1101 
1011 1110 


0010-1117 


1 100 0000 
0 100 0001 
0 100 0010 
1100 0011 
0 100 0100 


SUMA? 


DOU> 


Tecla * 


IR EAS SE ASA 


SY MA 


DOUuU> 


DEX HEX OCT BINARIO 


XxX 


105 
106 
107 
110 
111 
te 
113 


ER 


1100 0101 
1100 0110 
01000111 
0 100 1000 
1 100 1001 
1 100 1010 
0 100 1011 
1100 1100 
0100 1101 
0100 1110 
1100 1111 
0 101 0000 
1 101 0001 
1101 0010 
0 101 0011 
1 101 0100 
0 101 0101 
0101 0110 
1101 0111 
1 101 1000 
0 101 1001 
0101 1010 
1101 1011 
0101 1100 
1101 1101 
1 101 1110 
0101 1111 
0110 0000 
1 110 0001 
11100010 
01100011 
11100100 
01100101 
01100110 
11100111 
1 110 1000 
0110 1001 
0110 1010 
1110 1011 
01101100 
1 110 1101 
11101110 
01101111 
1 111 0000 
0111 0001 


ASCIH 


¡TATIANA AEZELCAO IO DBOZZE CACAO Nm 


Duo 337747 TOpAao gy» 


TATNARAESCO AO DO DOZZE NASA ON 


10 D0533 7747" TN'opo gs» 


Tecla * 
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APENDICE I 
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El considerable esfuerzo desarrollado por 
el Departamento de Defensa de los EE.UU. 
(DoD), para que el lenguaje Ada fuese 
desarrollado quedará compensado por las 
aportaciones de este lenguaje y su entorno 
a los sistemas informáticos del futuro. 


En Ada se conjugan el entorno y el 
lenguaje para dar como resultado un gran 
soporte a la ingeniería del software. 


Sus aplicaciones originales, sistemas en 
tiempo real para mando y control en el 
área de la Defensa, han sido ampliadas al 
campo industrial para el control de 


procesos, inteligencia artificial, etc. 


Muchos de los conceptos de la ingeniería 
del software tales como modularidad, 
fiabilidad, transportabilidad, etc., quedan 
recogidos en el ya conocido como 
lenguaje de la década de los 

noventa. 


